expl3 (LaTeX3-Programmierschicht), 65 Bytes
Im Folgenden wird eine Funktion definiert, die das Ergebnis auf dem Terminal expl3ausgibt (leider mit sehr ausführlichen Funktionsnamen):
\def\1#1{\fp_show:n{1/(\clist_map_function:nN{#1}\2)}}\def\2{+1/}
Ein vollständiges Skript, das vom Terminal aus ausgeführt werden kann, einschließlich aller Testfälle sowie des Setups, um Folgendes einzugeben expl3:
\RequirePackage{expl3}\ExplSyntaxOn
\def\1#1{\fp_show:n{1/(\clist_map_function:nN{#1}\2)}}\def\2{+1/}
\1{1, 1}
\1{1, 1, 1}
\1{4, 6, 3}
\1{20, 14, 18, 8, 2, 12}
\1{10, 10, 20, 30, 40, 50, 60, 70, 80, 90}
\stop
Wenn mit pdflatex <filename>dem folgenden Befehl ausgeführt wird, wird die Konsolenausgabe angezeigt:
This is pdfTeX, Version 3.14159265-2.6-1.40.20 (TeX Live 2019) (preloaded format=pdflatex)
restricted \write18 enabled.
entering extended mode
(./cg_resistance.tex
LaTeX2e <2018-12-01>
(/usr/local/texlive/2019/texmf-dist/tex/latex/unravel/unravel.sty
(/usr/local/texlive/2019/texmf-dist/tex/latex/l3kernel/expl3.sty
(/usr/local/texlive/2019/texmf-dist/tex/latex/l3kernel/expl3-code.tex)
(/usr/local/texlive/2019/texmf-dist/tex/latex/l3backend/l3backend-pdfmode.def))
(/usr/local/texlive/2019/texmf-dist/tex/latex/l3packages/xparse/xparse.sty)
(/usr/local/texlive/2019/texmf-dist/tex/generic/gtl/gtl.sty))
> 1/(\clist_map_function:nN {1,1}\2)=0.5.
<recently read> }
l.3 \1{1, 1}
?
> 1/(\clist_map_function:nN {1,1,1}\2)=0.3333333333333333.
<recently read> }
l.4 \1{1, 1, 1}
?
> 1/(\clist_map_function:nN {4,6,3}\2)=1.333333333333333.
<recently read> }
l.5 \1{4, 6, 3}
?
> 1/(\clist_map_function:nN {20,14,18,8,2,12}\2)=1.129538323621694.
<recently read> }
l.6 \1{20, 14, 18, 8, 2, 12}
?
> 1/(\clist_map_function:nN
{10,10,20,30,40,50,60,70,80,90}\2)=2.611669603067675.
<recently read> }
l.7 \1{10, 10, 20, 30, 40, 50, 60, 70, 80, 90}
?
)
No pages of output.
Transcript written on cg_resistance.log.
Erläuterung
\fp_show:n
: wertet sein Argument als Gleitkommaausdruck aus und gibt das Ergebnis auf dem Terminal aus. Dabei wird jedes erweiterbare Makro erweitert.
\clist_map_function:nN
: benötigt zwei Argumente, eine durch Kommas getrennte Liste und eine Funktion / ein Makro, wenn sie so aufgerufen wird, als würde \clist_map_function:nN { l1, l2, l3 } \foosie zu so etwas erweitert \foo{l1}\foo{l2}\foo{l3}. In unserem Fall wird statt des \fooMakros \2das verwendet, das sich zu erweitert, +1/so dass sich der Ausdruck zu erweitert+1/{l1}+1/{l2}+1/{l3}