Re: Trying to get chart from table working

[Peter Davis <pfd@pfdstudio.com>]

[-- Attachment #1: Type: text/plain, Size: 742 bytes --]


On Mon, Oct 2, 2017, at 11:37 AM, Eric S Fraga wrote:
> On Monday,  2 Oct 2017 at 10:24, Peter Davis wrote:
> 
> [...]
> 
> > I added (gnuplot . t) to my org-babel-load-languages, and now I'm back
> > to
> >
> > Wrong type argument: arrayp, nil
> 
> Very strange.  Try M-x toggle-debug-on-error RET and then post a
> backtrace?

Attached.

> Also maybe post your complete example.

I'm using the same t.org file you sent a couple of days ago.

> What versions of gnuplot and org do you have installed?

Gnuplot says it's V5.2, patchlevel 0
Org version is 9.0.9

By the way, I tried filling in a tint value in the first row, and a PSA
value for the middle row, but got the same error.

Thanks!
-pd

-- 
  Peter Davis
  www.techcurmudgeon.com

[-- Attachment #2: Backtrace-20171002.txt --]
[-- Type: text/plain, Size: 8586 bytes --]

Debugger entered--Lisp error: (wrong-type-argument arrayp nil)
  org-export-get-all-transcoders([cl-struct-org-export-backend nil org ((table lambda (table contents info) (concat nil contents nil)) (table-row lambda (row contents info) (if (eq (org-element-property :type row) (quote rule)) nil (let ((headerp (org-export-table-row-in-header-p row info)) (lastp (not ...)) (last-header-p (org-export-table-row-ends-header-p row info))) (when contents (cond nil nil nil (t ...)))))) (table-cell lambda (cell contents info) (let ((headerp (org-export-table-row-in-header-p (org-export-get-parent-element cell) info)) (column (1+ (cdr ...)))) nil (when contents nil (cond nil (t (setq contents ...)))) (if (or nil (plist-get info :orgtbl-ignore-sep) (not (org-export-get-next-element cell info))) contents (concat contents "	")))) (macro lambda (m c i) (org-element-macro-interpreter m nil))) nil nil nil nil])
  org-export-data-with-backend((table (:begin 1 :end 78 :type org :tblfm nil :contents-begin 1 :contents-end 78 :value nil :post-blank 0 :post-affiliated 1 :parent (section (:begin 1 :end 78 :contents-begin 1 :contents-end 78 :post-blank 0 :post-affiliated 1 :parent (org-data nil #2)) #0)) (table-row (:type standard :begin 1 :end 23 :contents-begin 2 :contents-end 22 :post-blank 0 :post-affiliated 1 :parent #0) (table-cell (:begin 2 :end 15 :contents-begin 3 :contents-end 13 :post-blank 0 :parent #1) #("2017-08-11" 0 10 (:parent #2))) (table-cell (:begin 15 :end 20 :contents-begin 15 :contents-end 18 :post-blank 0 :parent #1) #("185" 0 3 (:parent #2))) (table-cell (:begin 20 :end 22 :contents-begin 21 :contents-end 21 :post-blank 0 :parent #1))) (table-row (:type standard :begin 23 :end 49 :contents-begin 24 :contents-end 48 :post-blank 0 :post-affiliated 23 :parent #0) (table-cell (:begin 24 :end 37 :contents-begin 25 :contents-end 35 :post-blank 0 :parent #1) #("2017-08-21" 0 10 (:parent #2))) (table-cell (:begin 37 :end 39 :contents-begin 38 :contents-end 38 :post-blank 0 :parent #1)) (table-cell (:begin 39 :end 48 :contents-begin 39 :contents-end 46 :post-blank 0 :parent #1) #("#ffdd99" 0 7 (:parent #2)))) (table-row (:type standard :begin 49 :end 78 :contents-begin 50 :contents-end 77 :post-blank 0 :post-affiliated 49 :parent #0) (table-cell (:begin 50 :end 63 :contents-begin 51 :contents-end 61 :post-blank 0 :parent #1) #("2017-09-19" 0 10 (:parent #2))) (table-cell (:begin 63 :end 68 :contents-begin 63 :contents-end 66 :post-blank 0 :parent #1) #("854" 0 3 (:parent #2))) (table-cell (:begin 68 :end 77 :contents-begin 68 :contents-end 75 :post-blank 0 :parent #1) #("#ffdd99" 0 7 (:parent #2))))) [cl-struct-org-export-backend nil org ((table lambda (table contents info) (concat nil contents nil)) (table-row lambda (row contents info) (if (eq (org-element-property :type row) (quote rule)) nil (let ((headerp (org-export-table-row-in-header-p row info)) (lastp (not ...)) (last-header-p (org-export-table-row-ends-header-p row info))) (when contents (cond nil nil nil (t ...)))))) (table-cell lambda (cell contents info) (let ((headerp (org-export-table-row-in-header-p (org-export-get-parent-element cell) info)) (column (1+ (cdr ...)))) nil (when contents nil (cond nil (t (setq contents ...)))) (if (or nil (plist-get info :orgtbl-ignore-sep) (not (org-export-get-next-element cell info))) contents (concat contents "	")))) (macro lambda (m c i) (org-element-macro-interpreter m nil))) nil nil nil nil] (:title nil :date nil :author (#("Peter Davis" 0 11 (:parent #1))) :email "pfd@pfdstudio.com" :language "en" :select-tags ("export") :exclude-tags ("noexport") :creator "Emacs 25.1.1 (Org mode 9.0.9)" :headline-levels 3 :preserve-breaks nil :section-numbers t :time-stamp-file t :with-archived-trees headline :with-author t :with-broken-links nil :with-clocks nil :with-creator nil :with-date t :with-drawers (not "LOGBOOK") :with-email nil :with-emphasize t :with-entities t :with-fixed-width t :with-footnotes t :with-inlinetasks t ...))
  orgtbl-to-generic((("2017-08-11" 185 "") ("2017-08-21" "" "#ffdd99") ("2017-09-19" 854 "#ffdd99")) (:sep "	" :fmt org-babel-gnuplot-quote-tsv-field (:var data ("2017-08-11" 185 "") ("2017-08-21" "" "#ffdd99") ("2017-09-19" 854 "#ffdd99")) (:colname-names (data "Date" "PSA" "")) (:rowname-names) (:result-params "file" "replace") (:result-type . value) (:results . "file replace") (:exports . "results") (:cache . "no") (:noweb . "no") (:hlines . "no") (:tangle . "no") (:session) (:file . "timeseries.pdf") nil))
  org-babel-gnuplot-table-to-data((("2017-08-11" 185 "") ("2017-08-21" "" "#ffdd99") ("2017-09-19" 854 "#ffdd99")) "/var/folders/5n/ml6dqrv511d5rzl0rvy0d7100000gn/T/babel-44362rPo/gnuplot-44362gQI" ((:var data ("2017-08-11" 185 "") ("2017-08-21" "" "#ffdd99") ("2017-09-19" 854 "#ffdd99")) (:colname-names (data "Date" "PSA" "")) (:rowname-names) (:result-params "file" "replace") (:result-type . value) (:results . "file replace") (:exports . "results") (:cache . "no") (:noweb . "no") (:hlines . "no") (:tangle . "no") (:session) (:file . "timeseries.pdf")))
  #[257 "\211@\x01A\211<\211\203+\0\301\x02@\211<\206\x14\0\2119\211\203\x1c\0\x04\202!\0\302\303\x06\x06\"\266\202\304\305!\300#\202,\0\x01\266\202B\207" [((:var data ("2017-08-11" 185 "") ("2017-08-21" "" "#ffdd99") ("2017-09-19" 854 "#ffdd99")) (:colname-names (data "Date" "PSA" "")) (:rowname-names) (:result-params "file" "replace") (:result-type . value) (:results . "file replace") (:exports . "results") (:cache . "no") (:noweb . "no") (:hlines . "no") (:tangle . "no") (:session) (:file . "timeseries.pdf")) org-babel-gnuplot-table-to-data mapcar list org-babel-temp-file "gnuplot-"] 10 "\n\n(fn PAIR)"]((data ("2017-08-11" 185 "") ("2017-08-21" "" "#ffdd99") ("2017-09-19" 854 "#ffdd99")))
  mapcar(#[257 "\211@\x01A\211<\211\203+\0\301\x02@\211<\206\x14\0\2119\211\203\x1c\0\x04\202!\0\302\303\x06\x06\"\266\202\304\305!\300#\202,\0\x01\266\202B\207" [((:var data ("2017-08-11" 185 "") ("2017-08-21" "" "#ffdd99") ("2017-09-19" 854 "#ffdd99")) (:colname-names (data "Date" "PSA" "")) (:rowname-names) (:result-params "file" "replace") (:result-type . value) (:results . "file replace") (:exports . "results") (:cache . "no") (:noweb . "no") (:hlines . "no") (:tangle . "no") (:session) (:file . "timeseries.pdf")) org-babel-gnuplot-table-to-data mapcar list org-babel-temp-file "gnuplot-"] 10 "\n\n(fn PAIR)"] ((data ("2017-08-11" 185 "") ("2017-08-21" "" "#ffdd99") ("2017-09-19" 854 "#ffdd99"))))
  org-babel-gnuplot-process-vars(((:var data ("2017-08-11" 185 "") ("2017-08-21" "" "#ffdd99") ("2017-09-19" 854 "#ffdd99")) (:colname-names (data "Date" "PSA" "")) (:rowname-names) (:result-params "file" "replace") (:result-type . value) (:results . "file replace") (:exports . "results") (:cache . "no") (:noweb . "no") (:hlines . "no") (:tangle . "no") (:session) (:file . "timeseries.pdf")))
  org-babel-expand-body:gnuplot("set xdata time\nset timefmt \"%Y-%m-%d\"\nset xrange [\"2017-08-01\":\"2017-10-01\"]\nunset key\nplot data using 1:2 with histeps" ((:var data ("2017-08-11" 185 "") ("2017-08-21" "" "#ffdd99") ("2017-09-19" 854 "#ffdd99")) (:colname-names (data "Date" "PSA" "")) (:rowname-names) (:result-params "file" "replace") (:result-type . value) (:results . "file replace") (:exports . "results") (:cache . "no") (:noweb . "no") (:hlines . "no") (:tangle . "no") (:session) (:file . "timeseries.pdf")))
  org-babel-execute:gnuplot("set xdata time\nset timefmt \"%Y-%m-%d\"\nset xrange [\"2017-08-01\":\"2017-10-01\"]\nunset key\nplot data using 1:2 with histeps" ((:var data ("2017-08-11" 185 "") ("2017-08-21" "" "#ffdd99") ("2017-09-19" 854 "#ffdd99")) (:colname-names (data "Date" "PSA" "")) (:rowname-names) (:result-params "file" "replace") (:result-type . value) (:results . "file replace") (:exports . "results") (:cache . "no") (:noweb . "no") (:hlines . "no") (:tangle . "no") (:session) (:file . "timeseries.pdf")))
  org-babel-execute-src-block(nil ("gnuplot" "set xdata time\nset timefmt \"%Y-%m-%d\"\nset xrange [\"2017-08-01\":\"2017-10-01\"]\nunset key\nplot data using 1:2 with histeps" ((:var data ("2017-08-11" 185 "") ("2017-08-21" "" "#ffdd99") ("2017-09-19" 854 "#ffdd99")) (:colname-names (data "Date" "PSA" "")) (:rowname-names) (:result-params "file" "replace") (:result-type . value) (:results . "file replace") (:exports . "results") (:file . "timeseries.pdf") (:session) (:tangle . "no") (:hlines . "no") (:noweb . "no") (:cache . "no")) "" nil 292 "(ref:%s)"))
  org-ctrl-c-ctrl-c(nil)
  funcall-interactively(org-ctrl-c-ctrl-c nil)
  call-interactively(org-ctrl-c-ctrl-c nil nil)
  command-execute(org-ctrl-c-ctrl-c)