pdfnup --nup 4x4 --no-landscape foo.pdf
# creates foo-nup.pdf

;; KDE: show custom agenda with kanban via f12:
(with-eval-after-load 'org
  (setq org-agenda-custom-commands
        '(("o" "Agenda and TODOs"
           ((agenda)
            (tags-todo "-notodo-TERMIN" ((org-agenda-block-separator ?-)))
                (tags "KANBAN" ((org-agenda-block-separator ?-)
                            (org-agenda-compact-blocks nil)
                            (org-agenda-overriding-header ""))))))))

;; from https://www.emacswiki.org/emacs/TransposeWindows solution by Robert Bost
(defun rotate-windows (arg)
  "Rotate your windows; with prefix argument to rotate the other direction"
  (interactive "P")
  (if (not (> (count-windows) 1))
      (message "You can't rotate a single window!")
    (let* ((rotate-times (prefix-numeric-value arg))
           (direction (if (or (< rotate-times 0) (equal arg '(4)))
                          'reverse 'identity)))
      (dotimes (_ (abs rotate-times))
        (dotimes (i (- (count-windows) 1))
          (let* ((w1 (elt (funcall direction (window-list)) i))
                 (w2 (elt (funcall direction (window-list)) (+ i 1)))
                 (b1 (window-buffer w1))
                 (b2 (window-buffer w2))
                 (s1 (window-start w1))
                 (s2 (window-start w2))
                 (p1 (window-point w1))
                 (p2 (window-point w2)))
            (set-window-buffer-start-and-point w1 b2 s2 p2)
            (set-window-buffer-start-and-point w2 b1 s1 p1)))))))

(defun my/org-agenda-show-kanban ()
  (interactive)
  (save-excursion
    (search-forward ":KANBAN:")
    (org-agenda-goto)
    (org-narrow-to-subtree)
    (show-all)
    (fit-window-to-buffer)
    (widen)
    (recenter-top-bottom 0)))

(defun agenda-and-todo ()
  (interactive)
  (org-agenda nil "o")
  (delete-other-windows)
  (my/org-agenda-show-kanban)
  (rotate-windows 1))
;;      systemsettings shortcuts: map f12 to
;;        emacsclient -e '(progn (show-frame)(agenda-and-todo))'
(global-set-key (kbd "<f12>") 'agenda-and-todo)

#+STARTUP: overview
# TAG TERMIN is excluded from the Kanban table
#+TAGS: WOHNUNG(w) RAUS(r) SONST(s) LESEN(l) KANBAN(k) 1w6(1) FAMILIE(f) TERMIN(t)
#+STARTUP: hidestars logdone
#+SEQ_TODO: ❢ ☯ ⧖ | ✔ DEFERRED
# logdone adds a DONE timestamp when switching from a TODO (before |)
# to a DONE keyword (after |)
# State with (!) behind it means, add a timestamp when switching to that.
# See http://orgmode.org/manual/Tracking-TODO-state-changes.html

|   |   |   |
|---+---+---|
|   |   |   |
|   |   |   |
|   |   |   |
#+TBLFM: @1='(kanban-headers $#)::@2$1..@>$>='(kanban-zero @# $# "-TERMIN" 'file)

;; KDE: update all agenda kanban tables with C-S-f12 (ctrl-shift f12)
(defun kanban-update-all ()
  (interactive)
  (cl-loop for i in org-agenda-files do
           (with-current-buffer (find-file-noselect i)
             (save-excursion ;; avoid changing the position in the agenda files
               (beginning-of-buffer)
               (while (search-forward "='(kanban-" nil t)
                 (org-ctrl-c-ctrl-c))))))
;;      systemsettings shortcuts: map control shift f12 to
;;        emacsclient -e '(progn (show-frame)(kanban-update-all))'
(global-set-key (kbd "C-S-<f12>") 'kanban-update-all)

reset
# http://gnuplot.sourceforge.net/demo_5.1/gantt.html
OneMonth = strptime("%m","2")
OneWeek = strptime("%U","2")
OneDay = strptime("%d","2")
timeformat = "%Y-%m-%d %a"
T(N) = timecolumn(N,timeformat)

set xdata time
set format x "%a\n%d\n%b\n'%y"
set xtics OneDay nomirror
set xtics scale 2, 0.5
set mxtics 7

skiptorow=2
set yrange [(skiptorow-2):] reverse
set ytics nomirror

unset key
set title "{/=15 My Project}"
set grid x y
set border 3
set style arrow 1 nohead filled size screen 0.02, 15 fixed lt 3 lw 8

plot DATA using (T(3)) : ($0) : (T(4)-T(3)) : (0.0) : yticlabel(1) with vector as 1

(org-babel-do-load-languages
 'org-babel-load-languages
 '((gnuplot . t)))

(org-agenda-clockreport-parameter-plist
 (quote (:link t :maxlevel 2 :properties ("Effort"))))

(org-columns-default-format
   "%25ITEM %TODO %3PRIORITY %TAGS %17Effort(Estimated Effort){:} %CLOCKSUM")

#+name: ledger-to-table
#+begin_src elisp :var data=""
(concat "#+name: ledger-results\n"
          data
          "#+tblfm: \n"))
#+end_src

#+header: :post ledger-to-table(*this*)
#+header: :cmdline reg -D --register-format "| [%(format_date(date)) %(payee)] | %(display_account) | %(display_amount) | %(display_total) | \n" --wide --date-format %Y-%m-%d
#+begin_src ledger :results raw
2022-06-15 * py2guile
    Assets:epubli             3.13€
    Income:epubli
#+end_src

(concat "#+name: ledger-results\n"
          data
          "#+tblfm: \n"))

2022-06-15 * py2guile
    Assets:epubli             3.13€
    Income:epubli

#+header: :post ledger-to-table(*this*)
#+header: :cmdline bal --wide --date-format %Y-%m-%d --flat --balance-format "| %(partial_account) | %(display_total) | \n" 
#+begin_src ledger :exports both :noweb no-export :results raw 
{{{ledger-data}}}
#+end_src

{{{ledger-data}}}

# Local Variables:
# org-confirm-babel-evaluate: nil
# org-babel-noweb-wrap-start: "{{{"
# org-babel-noweb-wrap-end: "}}}"
# End:

#+latex: \vfill

#+latex_header: \usepackage[ngerman]{babel} % for German-formatted dates
#+latex: \newcommand{\pA}{THE NAME 1}
#+latex: \newcommand{\dA}{\today}
#+latex: \newcommand{\lA}{LOCATION}

#+latex: \newcommand{\pB}{THE NAME 2}
#+latex: \newcommand{\dB}{\today}
#+latex: \newcommand{\lB}{LOCATION}

| @@latex:\pA@@                       | @@latex:\hspace{1cm}@@ | @@latex:\pB@@                       |
|                                     |                        |                                     |
| @@latex:\underline{\phantom{\pA}}@@ |                        | @@latex:\underline{\phantom{\pB}}@@ |
| @@latex:\tiny \dA, \lA@@            |                        | @@latex:\tiny \dB, \lB@@            |

| Orga | 🧘 Mein Orga | 📅 Personal      | 📅 Kanban (other)  |
| Proj | 🧰 Apps      | 📅 Scrum A       | 📅 Scrum B         |
|      | 📚 Reviews   | ⏲ clock in LAST | ⏲ clock OUT       |

(save-excursion
  (goto-char 
   (org-find-exact-headline-in-buffer "TEXT"))
  (org-clock-in))

#+PLOT: file:"zustimmung-afd-verbot-ohne-afd.png" title:"Meinung zum AfD-Verbot"
#+PLOT: ind:1 deps:(2 3 4) type:2d with:histograms set:"yrange [0:]" 
#+PLOT: set:"style fill solid 0.3" set:"boxwidth 0.8 relative" set:"ylabel 'Anteil / %'"
| Gruppe   | Ablehnung  | Zustimmung  | Keine  | Anteil |
|----------+------------+-------------+--------+--------|
| Gesamt   |        52% |         27% |    21% |   100% |
| AfD      |        94% |          5% |     1% |    24% |
| Ohne AfD |        39% |         34% |    27% |    76% |
#+TBLFM: @4$5=(@2-@3)*100;%.0f%%::@4$2..$4=100*(@2*@2$5 - @3*@3$5)/(@4$5);%.0f%%

file:zustimmung-afd-verbot-ohne-afd.png

pages:
    stage: deploy
    script:
        - mkdir .public
        - set -x
        - apt-get update && DEBIAN_FRONTEND=noninteractive apt-get -yq install emacs-gtk texlive texlive-latex-extra || true
        - HOME="$(realpath .)" emacs --batch -Q -nw --load "$(realpath .emacs)" --find-file "$(realpath PRESENTATION.org)" --execute '(ignore-errors (org-beamer-export-to-pdf))' --execute '(with-current-buffer "*Org PDF LaTeX Output*" (print (buffer-string)))'
        - HOME="$(realpath .)" emacs --batch -Q -nw --load "$(realpath .emacs)" --find-file "$(realpath PRESENTATION.org)" -f org-html-export-to-html
        - cp -r * .public
        - cp PRESENTATION.html .public/index.html
        - cp PRESENTATION.pdf .public/
        - mv .public public
    artifacts:
     paths:
      - public
    rules:
      - if: $CI_COMMIT_BRANCH == $CI_DEFAULT_BRANCH
    environment: production

(require 'org)
(require 'ox-latex)
(require 'ox-beamer)
(require 'ox-html)

#+html: Get the slides: <a href="PRESENTATION.pdf">PRESENTATION.pdf</a>

% in header (before \begin{document}) or using #+latex_header: with org-mode:
% \usepackage{fbox}\usepackage{forloop}
\newcommand\fillgrid{
% iteration count
\newlength\sidelen
\setlength\sidelen{5mm}
% reduce by the border width to get correct sizes
\addtolength\sidelen{\fboxrule}
\addtolength\sidelen{\fboxsep}
\newcount\a\a\number\textwidth\relax
\newcount\b\b\number\sidelen\relax
\divide\a by\b
\divide\a by2
% leave space for the last box and inaccuracies
% number of horizontal doubleboxes 
\def\hboxcounthalf{\the\a}
\newcount\c\c\number\pagegoal\relax
\advance\c by-\pagetotal
\divide\c by\b
% leave space for the footer and inaccuracies
\advance\c by-5
% number of remaining vertical doubleboxes
\def\vboxcount{\the\c}
\newcommand\gridboxodd{%
\fbox{\vbox to \sidelen {\vfil%
\hbox to \sidelen{}%
\vfil%
}}}%
\newcommand\gridboxeven{%
\fbox[tb]{\vbox to \sidelen {\vfil%
\hbox to \sidelen%
{}%
\vfil%
}}}%
\newcounter{vloop}\newcounter{loop}%
\forloop{vloop}{1}{\value{vloop} < \vboxcount}{%
\forloop{loop}{1}{\value{loop} < \hboxcounthalf}{%
  \gridboxodd\gridboxeven%
}\gridboxodd%
\vspace*{-0.5mm}%
\\%
}\par
}