-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathWissen-macht-R.tex
1943 lines (1589 loc) · 110 KB
/
Wissen-macht-R.tex
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
586
587
588
589
590
591
592
593
594
595
596
597
598
599
600
601
602
603
604
605
606
607
608
609
610
611
612
613
614
615
616
617
618
619
620
621
622
623
624
625
626
627
628
629
630
631
632
633
634
635
636
637
638
639
640
641
642
643
644
645
646
647
648
649
650
651
652
653
654
655
656
657
658
659
660
661
662
663
664
665
666
667
668
669
670
671
672
673
674
675
676
677
678
679
680
681
682
683
684
685
686
687
688
689
690
691
692
693
694
695
696
697
698
699
700
701
702
703
704
705
706
707
708
709
710
711
712
713
714
715
716
717
718
719
720
721
722
723
724
725
726
727
728
729
730
731
732
733
734
735
736
737
738
739
740
741
742
743
744
745
746
747
748
749
750
751
752
753
754
755
756
757
758
759
760
761
762
763
764
765
766
767
768
769
770
771
772
773
774
775
776
777
778
779
780
781
782
783
784
785
786
787
788
789
790
791
792
793
794
795
796
797
798
799
800
801
802
803
804
805
806
807
808
809
810
811
812
813
814
815
816
817
818
819
820
821
822
823
824
825
826
827
828
829
830
831
832
833
834
835
836
837
838
839
840
841
842
843
844
845
846
847
848
849
850
851
852
853
854
855
856
857
858
859
860
861
862
863
864
865
866
867
868
869
870
871
872
873
874
875
876
877
878
879
880
881
882
883
884
885
886
887
888
889
890
891
892
893
894
895
896
897
898
899
900
901
902
903
904
905
906
907
908
909
910
911
912
913
914
915
916
917
918
919
920
921
922
923
924
925
926
927
928
929
930
931
932
933
934
935
936
937
938
939
940
941
942
943
944
945
946
947
948
949
950
951
952
953
954
955
956
957
958
959
960
961
962
963
964
965
966
967
968
969
970
971
972
973
974
975
976
977
978
979
980
981
982
983
984
985
986
987
988
989
990
991
992
993
994
995
996
997
998
999
1000
\documentclass[twoside, pagesize, fontsize=11pt, dvipsnames]{scrreport}
\usepackage[ngerman]{babel}
\usepackage{anyfontsize} % jede Schriftgrösse eben
\usepackage[table]{xcolor}
\usepackage{colortbl}
\usepackage{tabu}
\usepackage{svg}
\usepackage{fontenc}
\usepackage{eurosym}
\usepackage{soul} %% Sperren und Schafe stehlen
\usepackage{enumerate} %% Nummerieren
\usepackage{ifthen} %% Wenn-Dann eben
\usepackage{array} %% besserer Mathesatz
\usepackage[fleqn,reqno]{amsmath} %% für Mathematiksatz
\usepackage{amssymb} %% für Symbole
\usepackage{marginnote} %% Randnotizen (für Hypref)
\usepackage{booktabs} %% bessere Linien in Tabellen
\usepackage{longtable}
\usepackage{makecell}
\usepackage{graphicx}
\usepackage{float} %% Gleitobjektumgebungen
\usepackage{flafter} %% floats hinter ersten Verweis
\usepackage{rotfloat, rotating} %% drehen
\usepackage{morefloats} %% erweitert die Möglichkeiten
\usepackage[most]{tcolorbox}
\usepackage{titletoc}
\usepackage{afterpage}
\usepackage{hanging}
\usepackage{natbib}
%\bibliographystyle{apalike}
% \usepackage{babelbib}
% \usepackage{bibgerm}
%% für huxtables
\usepackage{calc}
%\usepackage{tabularx}
\usepackage{threeparttable}
% ende für huxtables
\usepackage{wrapfig}
\usepackage{fancybox} %% Schöne Boxen
\usepackage{nameref}
\usepackage[ngerman]{varioref}
\usepackage{pdfpages}
\usepackage{setspace}
\usepackage{boxedminipage} %% umrahmte Boxen
\usepackage{multicol} %% mehrspaltige Zeilen
\usepackage{epsfig,lscape} %% Graphiken auch Quer
\usepackage[stable, norule, flushmargin]{footmisc} %% Fußgut
\usepackage[np]{numprint} %%Zahlen an Komma ausrichten
\usepackage[mla]{ellipsis} %% Auslassungspunkte
% \usepackage[newcommands]{ragged2e} %Verbesserung der Seitenaufteilung
\usepackage[safe]{textcomp} %zusätzliche Zeichen, wie schwarze Punkte
%%%% hyperref %%%%
\usepackage[hyphens]{url} %% URLs sauber einfügen und umbrechen - muss vor hyperref
\usepackage[pdfa=true, pdflang = de, colorlinks = true, allcolors = darkgray]{hyperref}
%%%% muss alles hinter hyperref, weil es sonst package-clashes erzeugt:
\usepackage{accsupp} %% für Barrierefreiheit
\usepackage{pdfcomment} %% für Barrierefreiheit
%\PassOptionsToPackage{hyphens}{accsupp} %% übergibt hyphens für das url-Paket, das in accsupp ohne diese Option geladen wird.
\PassOptionsToPackage{hyphens}{pdfcomment} %% übergibt hyphens für das url-Paket, das in pdfcomment ohne diese Option geladen wird.
%%%%
\usepackage{twoopt}
\usepackage{paralist}
\usepackage{siunitx}
\usepackage{pdflscape}
%\usepackage[style=authoryear,maxcitenames=2, backend=biber, isbn=false,doi=false, eprint = false]{biblatex}
%___________________ Pakete Ende ____________________________________________
\usepackage{color}
\usepackage{fancyvrb}
\newcommand{\VerbBar}{|}
\newcommand{\VERB}{\Verb[commandchars=\\\{\}]}
\DefineVerbatimEnvironment{Highlighting}{Verbatim}{commandchars=\\\{\}}
% Add ',fontsize=\small' for more characters per line
\usepackage{framed}
\definecolor{shadecolor}{RGB}{241,243,245}
\newenvironment{Shaded}{\begin{snugshade}}{\end{snugshade}}
\newcommand{\AlertTok}[1]{\textcolor[rgb]{0.68,0.00,0.00}{#1}}
\newcommand{\AnnotationTok}[1]{\textcolor[rgb]{0.37,0.37,0.37}{#1}}
\newcommand{\AttributeTok}[1]{\textcolor[rgb]{0.40,0.45,0.13}{#1}}
\newcommand{\BaseNTok}[1]{\textcolor[rgb]{0.68,0.00,0.00}{#1}}
\newcommand{\BuiltInTok}[1]{\textcolor[rgb]{0.00,0.23,0.31}{#1}}
\newcommand{\CharTok}[1]{\textcolor[rgb]{0.13,0.47,0.30}{#1}}
\newcommand{\CommentTok}[1]{\textcolor[rgb]{0.37,0.37,0.37}{#1}}
\newcommand{\CommentVarTok}[1]{\textcolor[rgb]{0.37,0.37,0.37}{\textit{#1}}}
\newcommand{\ConstantTok}[1]{\textcolor[rgb]{0.56,0.35,0.01}{#1}}
\newcommand{\ControlFlowTok}[1]{\textcolor[rgb]{0.00,0.23,0.31}{#1}}
\newcommand{\DataTypeTok}[1]{\textcolor[rgb]{0.68,0.00,0.00}{#1}}
\newcommand{\DecValTok}[1]{\textcolor[rgb]{0.68,0.00,0.00}{#1}}
\newcommand{\DocumentationTok}[1]{\textcolor[rgb]{0.37,0.37,0.37}{\textit{#1}}}
\newcommand{\ErrorTok}[1]{\textcolor[rgb]{0.68,0.00,0.00}{#1}}
\newcommand{\ExtensionTok}[1]{\textcolor[rgb]{0.00,0.23,0.31}{#1}}
\newcommand{\FloatTok}[1]{\textcolor[rgb]{0.68,0.00,0.00}{#1}}
\newcommand{\FunctionTok}[1]{\textcolor[rgb]{0.28,0.35,0.67}{#1}}
\newcommand{\ImportTok}[1]{\textcolor[rgb]{0.00,0.46,0.62}{#1}}
\newcommand{\InformationTok}[1]{\textcolor[rgb]{0.37,0.37,0.37}{#1}}
\newcommand{\KeywordTok}[1]{\textcolor[rgb]{0.00,0.23,0.31}{#1}}
\newcommand{\NormalTok}[1]{\textcolor[rgb]{0.00,0.23,0.31}{#1}}
\newcommand{\OperatorTok}[1]{\textcolor[rgb]{0.37,0.37,0.37}{#1}}
\newcommand{\OtherTok}[1]{\textcolor[rgb]{0.00,0.23,0.31}{#1}}
\newcommand{\PreprocessorTok}[1]{\textcolor[rgb]{0.68,0.00,0.00}{#1}}
\newcommand{\RegionMarkerTok}[1]{\textcolor[rgb]{0.00,0.23,0.31}{#1}}
\newcommand{\SpecialCharTok}[1]{\textcolor[rgb]{0.37,0.37,0.37}{#1}}
\newcommand{\SpecialStringTok}[1]{\textcolor[rgb]{0.13,0.47,0.30}{#1}}
\newcommand{\StringTok}[1]{\textcolor[rgb]{0.13,0.47,0.30}{#1}}
\newcommand{\VariableTok}[1]{\textcolor[rgb]{0.07,0.07,0.07}{#1}}
\newcommand{\VerbatimStringTok}[1]{\textcolor[rgb]{0.13,0.47,0.30}{#1}}
\newcommand{\WarningTok}[1]{\textcolor[rgb]{0.37,0.37,0.37}{\textit{#1}}}
%\def\tightlist{}
%%%%%%%%%%%%%%%%%%%%% Größen ändern gegen LaTeXs Hysterie %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\widowpenalty=10000 % erschwert Hurenkindern das Leben
\clubpenalty=3000 % erschwert Schusterjungen das Leben
\tolerance=300 %Wortabstände dehnbarer; fürs Final auf 300!!
\hbadness= 300
\emergencystretch= 1.5em
\hfuzz = 0.3pt
\vfuzz \hfuzz
\raggedbottom
%% erste Zeile einrücken
\setlength{\parindent}{1em}
\newcommand{\Absatz}{\vspace{4ex} \noindent}
%% Einzug für Formeln
\setlength\mathindent{1pc}
%% Fußnoten
%\counterwithout{footnote}{chapter} % über Kapitel hinweg zählen
\addtolength{\skip\footins}{1ex plus 2mm} % Abstand zum Text
\renewcommand{\footnotesep}{1ex} % da nummeriert, Abstand ok
% rechtsbündig aus likem Rand
\let\Umathcode\XeTeXmathcode \let\Umathchardef\XeTeXmathchardef
%____________ Größen Ende ______________________________
%%%%% Farbboxen für Hinweise ------
\tcbset{textmarker/.style={%
enhanced,
parbox=false,boxrule=0mm,boxsep=0mm,arc=0mm,
outer arc=0mm,left=6mm,right=3mm,top=7pt,bottom=7pt,
toptitle=1mm,bottomtitle=1mm,oversize}}
\newtcolorbox{hintBox}{textmarker,
borderline west={6pt}{0pt}{yellow},
colback=yellow!10!white}
\newtcolorbox{importantBox}{textmarker,
borderline west={6pt}{0pt}{red},
colback=red!10!white}
\newtcolorbox{noteBox}{textmarker,
borderline west={6pt}{0pt}{green},
colback=green!10!white}
\newcommand{\Anmerkung}[1]
{\begin{hintBox}
#1
\end{hintBox}}
\newcommand{\Alarm}[1]
{\begin{importantBox}
#1
\end{importantBox}}
\newcommand{\Allesgut}[1]
{\begin{noteBox}
#1
\end{noteBox}}
\newcommand{\on}[1]{{#1}} %deaktiviertes oldstylenums
\newcommand{\p}{{\npnoaddmissingzero \npdecimalsign{.}}} %p-Wert
%kompakt in zB Kovarianztabellen
%%%%%%%%% Umgebungen und Kommandos %%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%% Boxen
\newtcolorbox{IYI_C}{
colback=white,
colframe=MidnightBlue,
coltext=black,
boxsep=5pt,
arc=4pt}
\newenvironment{IYI}[1]
{
\begin{itemize}
\renewcommand{\labelitemi}{
\raisebox{-.9\height}[0pt][0pt]{
{\setkeys{Gin}{width= 3em,keepaspectratio}
\hspace*{-3cm}\includegraphics{images/IYI.pdf}}
}
}
\setlength{\fboxsep}{1em}
\begin{IYI_C}
\item
}
{
\end{IYI_C}
\end{itemize}
}
\newtcolorbox{QA_C}{
colback=white,
colframe=orange,
coltext=black,
boxsep=5pt,
arc=4pt}
\newenvironment{QA}[1]
{
\begin{itemize}
\renewcommand{\labelitemi}{
\raisebox{-.9\height}[0pt][0pt]{
{\setkeys{Gin}{width=3em,keepaspectratio}
\hspace{-2cm}\includegraphics{images/QA.pdf}}
}
}
\setlength{\fboxsep}{1em}
\begin{QA_C}
\item
}
{
\end{QA_C}
\end{itemize}
}
%%% ENDE Boxen
%% \PBS für geschützten Backslash
\newcommand{\PreserveBackslash}[1]{\let\temp=\\#1\let\\=\temp}
\let\PBS=\PreserveBackslash
\renewcommand{\labelitemi}{--}
%%% Bilder einbauen (breitbild = Seitenbreite skalieren; bild zentriert
\newcommandtwoopt{\Bild}[3][1][0 0 0
0]{ \begin{center}
\includegraphics[width=#1\linewidth,trim = #2, clip]{images/#3}
\end{center}}
%%%% Aufzählungen
\renewcommand{\labelitemi}{\small\textbullet}
\newcommand{\Beschrieb}[1]{\ifthenelse{\isundefined{#1}}{}{
\begin{minipage}[H]{1.0\linewidth}
\begin{multicols}{3}
#1
\end{multicols}
\end{minipage}\vspace{5mm}}}
%% für Barrierefreiheit
\newcommand{\AccTool}[2]{\BeginAccSupp{method=pdfstringdef,unicode,Alt={{#1}}}\pdftooltip{{#2}}{{#1}}\EndAccSupp{}}
%__________________ Umgebungen Ende _____________________________________________
%-------- Tabellenbefehle ----------------------
%LaTeX interpretiert Tabulatoren und Zeilenenden für Tabellen
% & und \\ können eingesetzt werden, wenn nötig
% bei zB \\\midrule%! muss das Zeilenende auskommentiert sein
\renewcommand{\floatpagefraction}{.7}
\renewcommand{\textfraction}{.12}
\renewcommand{\topfraction}{.8} % vorher: .7
\renewcommand{\bottomfraction}{.5} % vorher: .3
\makeatletter
\renewcommand{\fps@figure}{htbp}
\renewcommand{\fps@table}{htbp}
\makeatother
\setbox0=\hbox{%
\begin{tabular}{c}
\global\let\CsvNewline\\%
\end{tabular}}
{\catcode`\^^M=\active%
\gdef\CsvObeylines{\catcode`\^^M=\active \let^^M=\CsvNewline}}%
\setcapindent{1em}
\newcommand{\TBZeilenabstand}{\aboverulesep = 0pt \belowrulesep = 0pt}
\newcommand{\NormalZeilenabstand}{\aboverulesep = 0.605mm \belowrulesep = 0.984mm}
% \newcommand{\corcmidrule}[1][2pt]{% \corcmidrule[<len>]
% \\[\dimexpr-\normalbaselineskip-\belowrulesep-\aboverulesep-#1\relax]%
% }
% Correct for \cmidrule colour adjustment/vertical skip
\newcommand{\corcmidrule}[1][2pt]{% \corcmidrule[<len>]
\\[\dimexpr-\arraystretch\normalbaselineskip-\belowrulesep-\aboverulesep-#1\relax]%
}
\newcommand{\cgrauDurch}{\arrayrulecolor{black!30}\specialrule{.2pt}{0pt}{0pt}\arrayrulecolor{black}}
\newcommand{\cgrau}[1]{\arrayrulecolor{black!30} \cmidrule[.8pt](l{3pt}r{2pt}){#1} \corcmidrule[1pt] \arrayrulecolor{black}}
%% variable Verweise
\renewcommand\reftextfaceafter{gegen\"uberliegend}
\renewcommand\reftextfacebefore{gegen\"uberliegend}
\renewcommand\reftextbefore{vorherige Seite}
\renewcommand\reftextafter{n\"achste Seite}
\renewcommand\reftextcurrent{}
\renewcommand\reftextfaraway[1]{Seite~\pageref{#1}}
\makeatletter
\@addtoreset{figure}{section}
\@addtoreset{table}{section}
\makeatother
\renewcommand{\thefigure}{\thesection.\arabic{figure}}
\renewcommand{\thetable}{\thesection.\arabic{table}}
%\renewcommand{\bminipage}{\begin{minipage}[t]{.9\textwidth}}
%\renewcommand{\eminipage}{\end{minipage}}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% aus Bookdown
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%
\definecolor{shadecolor}{RGB}{248,248,248}
% \newenvironment{Shaded}{\begin{snugshade}}{\end{snugshade}}
%\newcommand{\AlertTok}[1]{\textcolor[rgb]{0.94,0.16,0.16}{#1}}
% \newcommand{\AnnotationTok}[1]{\textcolor[rgb]{0.56,0.35,0.01}{\textbf{\textit{#1}}}}
% \newcommand{\AttributeTok}[1]{\textcolor[rgb]{0.77,0.63,0.00}{#1}}
% \newcommand{\BaseNTok}[1]{\textcolor[rgb]{0.00,0.00,0.81}{#1}}
% \newcommand{\BuiltInTok}[1]{#1}
% \newcommand{\CharTok}[1]{\textcolor[rgb]{0.31,0.60,0.02}{#1}}
% \newcommand{\CommentTok}[1]{\textcolor[rgb]{0.56,0.35,0.01}{\textit{#1}}}
% \newcommand{\CommentVarTok}[1]{\textcolor[rgb]{0.56,0.35,0.01}{\textbf{\textit{#1}}}}
% \newcommand{\ConstantTok}[1]{\textcolor[rgb]{0.00,0.00,0.00}{#1}}
% \newcommand{\ControlFlowTok}[1]{\textcolor[rgb]{0.13,0.29,0.53}{\textbf{#1}}}
% \newcommand{\DataTypeTok}[1]{\textcolor[rgb]{0.13,0.29,0.53}{#1}}
% \newcommand{\DecValTok}[1]{\textcolor[rgb]{0.00,0.00,0.81}{#1}}
% \newcommand{\DocumentationTok}[1]{\textcolor[rgb]{0.56,0.35,0.01}{\textbf{\textit{#1}}}}
% \newcommand{\ErrorTok}[1]{\textcolor[rgb]{0.64,0.00,0.00}{\textbf{#1}}}
% \newcommand{\ExtensionTok}[1]{#1}
% \newcommand{\FloatTok}[1]{\textcolor[rgb]{0.00,0.00,0.81}{#1}}
% \newcommand{\FunctionTok}[1]{\textcolor[rgb]{0.00,0.00,0.00}{#1}}
% \newcommand{\ImportTok}[1]{#1}
% \newcommand{\InformationTok}[1]{\textcolor[rgb]{0.56,0.35,0.01}{\textbf{\textit{#1}}}}
% \newcommand{\KeywordTok}[1]{\textcolor[rgb]{0.13,0.29,0.53}{\textbf{#1}}}
% \newcommand{\NormalTok}[1]{#1}
% \newcommand{\OperatorTok}[1]{\textcolor[rgb]{0.81,0.36,0.00}{\textbf{#1}}}
% \newcommand{\OtherTok}[1]{\textcolor[rgb]{0.56,0.35,0.01}{#1}}
% \newcommand{\PreprocessorTok}[1]{\textcolor[rgb]{0.56,0.35,0.01}{\textit{#1}}}
% \newcommand{\RegionMarkerTok}[1]{#1}
% \newcommand{\SpecialCharTok}[1]{\textcolor[rgb]{0.00,0.00,0.00}{#1}}
% \newcommand{\SpecialStringTok}[1]{\textcolor[rgb]{0.31,0.60,0.02}{#1}}
% \newcommand{\StringTok}[1]{\textcolor[rgb]{0.31,0.60,0.02}{#1}}
% \newcommand{\VariableTok}[1]{\textcolor[rgb]{0.00,0.00,0.00}{#1}}
% \newcommand{\VerbatimStringTok}[1]{\textcolor[rgb]{0.31,0.60,0.02}{#1}}
% \newcommand{\WarningTok}[1]{\textcolor[rgb]{0.56,0.35,0.01}{\textbf{\textit{#1}}}}
\makeatletter
\def\maxwidth{\ifdim\Gin@nat@width>\linewidth\linewidth\else\Gin@nat@width\fi}
\def\maxheight{\ifdim\Gin@nat@height>\textheight\textheight\else\Gin@nat@height\fi}
\makeatother
\providecommand{\tightlist}{%
\setlength{\itemsep}{0pt}\setlength{\parskip}{0pt}}
\setcounter{secnumdepth}{5}
\ifx\paragraph\undefined\else
\let\oldparagraph\paragraph
\renewcommand{\paragraph}[1]{\oldparagraph{#1}\mbox{}}
\fi
\ifx\subparagraph\undefined\else
\let\oldsubparagraph\subparagraph
\renewcommand{\subparagraph}[1]{\oldsubparagraph{#1}\mbox{}}
\fi
%%% Use protect on footnotes to avoid problems with footnotes in titles
\let\rmarkdownfootnote\footnote%
\def\footnote{\protect\rmarkdownfootnote}
%%% Change title format to be more compact
\usepackage{titling}
%%%%%%%%%%%%%%%%%%%%%%%%%%%% aus bookdown Ende %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\hypersetup { pdfa=true, pdflang = de,colorlinks = true, linkcolor =
black, urlcolor = black, pdfauthor={Dr. Fretwurst, Benjamin},
pdfsubject={Statistik Aufbau}, pdftitle={Wissen macht R!},
pdfkeywords={Statistik, lineares Modell, Regression, Varianzanalyse, Clusteranalyse} lang = {DE} }
\urlstyle{same}
%\addbibresource{../PeM.bib}
%\ExecuteBibliographyOptions{url=true, doi = false}
\usepackage[a4paper, left=30mm, asymmetric, top=30mm,textwidth=15cm,
textheight=22.5cm]{geometry}
% Headers and footers
\usepackage{scrlayer-scrpage}
\pagestyle{scrheadings}
\clearscrheadfoot
\automark[section]{section}
\ihead[]{\headmark} %oben links
\chead[]{} %oben Mitte
\ohead{\pagemark} %oben rechts Logo über AddToShipoutPicture unten
\ifoot[]{\footnotesize{}} %unten links
\cfoot[]{} %unten Mitte
\ofoot[]{\footnotesize{}} % unten rechts
\setheadsepline{.2pt}
\setfootsepline{.2pt}
\addtokomafont{disposition}{\sffamily}
\addtokomafont{disposition}{\sffamily}
%\renewcommand{\familydefault}{\sfdefault}
\usepackage[labelsep=colon]{caption}
% \captionsetup[table]{textfont = {sf}, labelfont = {sf}} %bf
%\renewcaptionname{ngerman}{\tablename}{Tabelle}
%\usepackage{baskervald} % auch nicht schlecht
\usepackage[]{CrimsonPro} % gut
%\setmainfont{Century Gothic} %schlimm, aber IaKom und darum schön
\usepackage[german=swiss]{csquotes}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%Dokumentstart
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\input{files/Silbentrennung}
\begin{document}
\begin{titlepage}
\sffamily
\setlength\parindent{0pt}
\hfill \includegraphics[width = 6cm]{images/uzh_logo_d_pos.pdf}\par
\vspace{5cm}
{\bfseries \fontsize{20}{26} \selectfont Wissen macht R!} \\[1ex]
\vfill
Dr. Benjamin Fretwurst\\
\vfill
{\large }
\raggedright
12/12/22 \\[.5cm]
%\textbf{[\today] \\[1.5cm]}
\pagenumbering{Roman}
\clearpage
\vspace*{4cm}
Quellenangabe\\[.5cm]
%\end{tabbing}
\end{titlepage}
\makeatletter
\AddToShipoutPicture{\setlength{\unitlength}{1cm}\put(24.32,18.65){{\includegraphics[height=.6cm]{images/uzh_logo_d_pos.pdf}}}}
\makeatletter
%Überschriften unterdrücken durch IV und TV (wegen multicolumn)
\renewcommand{\listoftables}{\@starttoc{lot}}
\renewcommand{\tableofcontents}{\@starttoc{toc}}
\renewcommand{\listoffigures}{\@starttoc{lof}}
%Mehr Platz für breite Tabellennummern
\renewcommand{\l@table}{\@dottedtocline{1}{1em}{3em}}
\makeatother
\clearpage
\section*{Inhalt}
\label{sec:inhalt}
\pdfbookmark[1]{\contentsname}{toc}
% \begin{multicols}{2}
\tableofcontents
% \end{multicols}
\clearpage
\section*{Tabellen- und Abbildungsverzeichnis}
\pdfbookmark[1]{Tabellen/Abbildungen}{lot}
\section*{Abbildungsverzeichnis}
\label{sec:Abbildungsverzeichnis}
%\begin{multicols}{2}
\listoffigures
%\end{multicols}
\section*{Tabellenverzeichnis}
\label{sec:tabellenverzeichnis}
%\begin{multicols}{2}
\listoftables
%\end{multicols}
\cleardoublepage
\pagenumbering{arabic}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%Body
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\bookmarksetup{startatroot}
\hypertarget{intro}{%
\chapter{Intro}\label{intro}}
R ist ein kostenloses, erweiterbares, modernes und freundliches
Statistiksystem (programmierbar mit Lösungen in stapelweise Paketen).
Mit R-Studio können Sie Ihre Datenverarbeitung und -analysen in R für
sich und andere sehr gut dokumentieren. Mit den Einführungen auf dieser
Seite sollen Sie in die Lage versetzt werden, so schnell und einfach wie
möglich so viel wie möglich aus dem System herauszuholen. Es wird eine
Herausforderung, die Sie schaffen werden. Gehen Sie gut gelaunt an R
heran, üben Sie Frustrationstoleranz, machen Sie Ihre Tastatut nicht
kaputt und sagen Sie sich immer wieder: Ich muss, ich will, ich kann.
:-)
Schauen Sie am Anfang mal Ihre Installation an. Wenn Sie R und R-Studio
das erste Mal installieren, dann können Sie das nach der Anleitung tu,
die Sie unter {[}Installation{]} finden. Dort erfahren Sie auch, wie Sie
\enquote{tinytex} mit R-Studio installieren und damit die Möglichkeit
haben, sehr schöne Berichte direkt in R-Studio setzen zu lassen
(\href{./files/Forschungsbericht_UE_3_AG_B.pdf}{zum Beispiel}). Damit
Sie gleich noch Literaturverweise und Literaturverzeichnis automatisiert
mitproduzieren können, finden Sie in der Installationsanleitung auch
gleich noch Zotero.
\hypertarget{programmieren-heisst-kopieren}{%
\section*{Programmieren heisst
kopieren}\label{programmieren-heisst-kopieren}}
\markright{Programmieren heisst kopieren}
Sie lernen mit der Zeit wie Sie Aufgaben in R lösen, indem Sie sich
Codeschnipsel suchen, diese kopieren und an Ihre Daten und Variablen
anpassen. Mit R zu arbeiten verlangt von Ihnen keine aktiven
Programmierkenntnisse. Sie müssen nur den richtigen Code (z.B. auf
\enquote{Stack Overflow}) finden und für sich anpassen. So arbeiten
übrigens die meisten Programmierer:innen in ihrem Alltag.
\bookmarksetup{startatroot}
\hypertarget{basics}{%
\chapter{Basics}\label{basics}}
\hypertarget{datenvisualisierung}{%
\section{Datenvisualisierung}\label{datenvisualisierung}}
\hypertarget{grundlagen-programmierung}{%
\section{Grundlagen Programmierung}\label{grundlagen-programmierung}}
\begin{itemize}
\tightlist
\item
Funktionen
\item
Objekte
\item
Datentypen
\item
Variablen, Datensätze
\item
Pakete
\end{itemize}
\hypertarget{funktionen}{%
\subsection{Funktionen}\label{funktionen}}
\bookmarksetup{startatroot}
\hypertarget{Installation}{%
\chapter{Installation}\label{Installation}}
R ist ein sehr leistungsstarkes System für statistische Analysen. Sie
können R alleine herunterladen und den integrierten Editor nutzen, um
mit R zu arbeiten. Viel komfortabler ist es aber, die R-Umgebung
R-Studio zu nutzen, das Ihnen hilft, Ihre Daten und Variablen leichter
zu finden und in den R-Code zu integrieren, Sie finden Ihre Daten
leichter und die Dateien, mit denen Sie arbeiten. Zusätzlich hilft Ihnen
R-Studio dabei, Ihre Arbeit mit R verständlich zu dokumentieren. Dafür
nutzen Sie sehr komfortabel Markdown, eine ganz einfache
Kennzeichnungssprache, um Texte zu schreiben und zu formatieren. In
R-Studio haben Sie dafür sogar einen Formatierungseditor, der Ihnen auch
dafür Formatierungsschaltflächen zur Verfügung stellt, wie Sie sie von
Word und ähnlichen Programmen kennen. Sie können mit dem System sogar so
weit gehen, dass Sie Ihre Berichte komplett in R-Studio schreiben und am
Ende als schönen PDF-Bericht rauslassen können und sogar einfach als
Internetseite rauslassen können. Dabei werden Ihre Auswertungen in R als
Tabellen und Grafiken direkt integriert und sie müssen es nicht in ein
Word kopieren; UND, wenn Sie etwas an einer Variablen ändern oder etwas
am Datensatz korrigieren, würde das automatisch für den ganzen Bericht
geändert; UND mit einer für Sie erstellten Vorlage, haben Sie eine
schöne Formatierungsvorlage und brauchen sich auch um solche Dinge nicht
mehr gross zu kümmern. Dafür können/müssten Sie noch tinytex
installieren, müssen sich dann später aber nicht mehr drum kümmern. Eine
besondere Herausforderung wissenschaftlicher Arbeiten ist immer wieder
die Erstellung von korrekten Literaturnachweisen und eines
Quellenverzeichnisses. Auch da arbeitet das System für Sie. Für diese
Aufgabe empfehle ich Ihnen Citavi zu nutzen oder Zotero. Ich zeige Ihnen
daher noch, wie Sie Zotero installieren und nutzen können.
Hier können Sie sich die Installation des gesamten Systems im Video
anschauen.
\begin{Shaded}
\begin{Highlighting}[]
\NormalTok{vembedr}\SpecialCharTok{::}\FunctionTok{embed\_youtube}\NormalTok{(}\StringTok{"BVBvx99JMU0"}\NormalTok{) }\SpecialCharTok{|\textgreater{}}
\NormalTok{ vembedr}\SpecialCharTok{::}\FunctionTok{use\_rounded}\NormalTok{()}
\end{Highlighting}
\end{Shaded}
\hypertarget{downloadquellen}{%
\section{Downloadquellen}\label{downloadquellen}}
\hypertarget{r}{%
\subsection{R}\label{r}}
Laden Sie die neuste Version von R herunter:
\begin{itemize}
\item
für Windows R base und am besten gleich noch R-tools R tools.
\item
für Macs hier R-{[}\ldots{]}.pkg für ältere Macs mit Intel-Chips oder
R-{[}\ldots{]}arm64.pkg für Macs mit M1 oder M2 (bei den Macs braucht
es keine R-tools) .
\item
für Linux R für Ihre Linuxversion .
\end{itemize}
\hypertarget{r-studio}{%
\subsection{R Studio}\label{r-studio}}
R-Studio finden Sie hier. Ihnen wird da ganz oben die Version angeboten,
die für Ihr System die Richtige ist!
\hypertarget{zotero}{%
\subsection{Zotero}\label{zotero}}
Mit Zotero können Sie Literatur verwalten, Verweise leicht automatisch
finden und einfach in RMarkdown-Dokumente integrieren oder auch
Verzeichnisse für Word erstellen. Zotero kann kostenlos genutzt werden.
Daher gehe ich hier eher darauf ein. Citavi ist auch gut und inzwischen
zum Glück auch für den Mac verfügbar. Der Nachteil ist nur, dass Sie
Citavi nicht mehr kostenlos nutzen, können, wenn Sie die UZH mal
verlassen und an eine andere Uni gehen, wo das Programm vielleicht nicht
kostenlos zur Verfügung gestellt wird. Daher gehe ich hier eher auf
Zotero ein.
Hier finden Sie Zotero. Installieren Sie dann gleich noch die
Erweiterung Dort finden Sie auch gleich die Anleitung für die
Installation der Erweiterung.
\hypertarget{reihenfolge-der-installation}{%
\section{Reihenfolge der
Installation}\label{reihenfolge-der-installation}}
\begin{enumerate}
\def\labelenumi{\arabic{enumi}.}
\tightlist
\item
Installieren Sie erst R base
\item
dann Rtools (nur auf Windows)
\item
dann R-Studio
\item
dann tinytex
\item
dann Zotero
\item
dann Zotero-better-bibtex
\item
dann legen Sie den Ordner mit den ganzen Vorlagen bei sich ab.
\end{enumerate}
\hypertarget{installationsanleitung}{%
\section{Installationsanleitung}\label{installationsanleitung}}
R und R-Studio sind wie ganz normale Programe. Wie Sie die installieren,
zeige ich im Video, aber eigentlich brauchen Sie das nicht unbedingt.
Ein bischen anders ist die Installation von tinytex in R. Und dann zeige
ich Ihnen noch, wie Sie Pakete in R-Studio installieren.
\hypertarget{installation-von-tinytex}{%
\subsection{Installation von tinytex}\label{installation-von-tinytex}}
Gehen Sie in R-Studio oben im Menü auf den Menüpunkt \enquote{Tools} und
dort ganz oben auf \enquote{Install Packages \ldots{}}. Dann geben Sie
im leeren Eingabefeld \enquote{Packages} ein: \enquote{tinytex}. Wenn
Sie es richtig geschrieben haben, steht es auch gleich fett zur Auswahl.
Starten Sie die Installaion, indem Sie auf den Schalter
\enquote{Install} klicken.
Jetzt ist das Paket tinytex installiert, dass Ihnen die Arbeit abnimmt,
ein TeX-System zu installieren. Das machen Sie automatisch indem Sie in
der R-Studio-Console eingeben: \enquote{tinytex::install\_tinytex}. Dann
machen Sie etwas Schönes. Sie haben selbst bei schnelleren Rechnern Zeit
um sich einen Kaffee zu machen. Sie können aber auch in 20 Minuten etwas
stöbern, um die 20 Minuten Installation vorbeiziehen zu lassen. Lassen
Sie derweil Ihr System in Ruhe die Arbeit machen.
ODER, einfach diesen Code hier kopieren, in die R-(Studio)-Konsole
einfügen und mit Enter abschicken:
\begin{Shaded}
\begin{Highlighting}[]
\CommentTok{\# installiere das R{-}Paket tinytex}
\FunctionTok{install.packages}\NormalTok{(}\StringTok{"tinytex"}\NormalTok{) }
\CommentTok{\# installiere ein winziges LaTeX{-}System}
\NormalTok{tinytex}\SpecialCharTok{::}\FunctionTok{install\_tinytex}\NormalTok{() }
\end{Highlighting}
\end{Shaded}
\hypertarget{installation-von-paketen}{%
\subsection{Installation von Paketen}\label{installation-von-paketen}}
Die meisten Pakete können direkt von CRAN installiert werden. Das geht
in RStudio recht einfach über das Menü \enquote{Tools} -\textgreater{}
\enquote{Install Packages} und dann muss nur bei \enquote{Packages}
eingegeben werden, welche Pakete installiert werden sollen. Manchmal
gibt es die neusten Versionen eines Paketes nicht im Repository CRAN.
Dann müssen sie direkt von den Entwicklern installiert werden. Die
meisten Pakete werden dann über das sogenannte GitHub istalliert. Das
geht am einfachsten über Befehle nach dem Muster:
remotes::install\_github(\enquote{Entwicklername/Paket}). Häufig wird
dann von R noch gefragt, ob die Pakete und alle abhängigen Pakete
installiert werden sollen. Oder R fragt \enquote{Möchten Sie versuchen,
das Paket, welches eine Kompilierung erfordert, aus den Quelltexten zu
installieren?}. In der Regel ist es gut und richtig, wenn man das
bestätigt (Sie geben unten in der \enquote{Console} ein: \enquote{Yes}
und lassen R dann mal machen.). Manchmal gibt es aber einen Fehler weil
ein Paket nicht kompiliert werden kann oder so (häufiger auf Macs der
Fall). Dann ist es sinnvoll, dass man mal \enquote{n} für No eingibt.
Dann wählt R die letzte verfügbare binäre, also vorkompilierte Version.
Zum Beispiel ist das oft beim Paket \enquote{systemfonts} der Fall. Da
also besser mal beim zweiten Versuch das Kompilieren ablehnen, also auf
\enquote{no}.
Auch dieses Anleitung veraltet in der Regel schon nach einem Tag, weil
die Entwickler für R ständig an ihren Paketen basteln. Wenn also eine
Installation nicht funktioniert, ist es sinnvoll nach dem Paketnamen zu
googlen, also \enquote{r Paketname} googlen. In der Regel bekommen Sie
dann einen CRAN-Eintrag als einen der ersten Treffer. Wenn Sie da
draufgehen, sehen sie recht technische Einträge. Dort suchen Sie dann
\enquote{Vignette}. In den Vignetten steht eigentlich immer als erstes,
wie diese Pakete installiert werden sollen. Das kopieren Sie sich nach R
und schicken die Zeile einmal ab. Achten Sie darauf, ob vielleicht mal
ein Paket umbenannt wurde und es also Nachfolgepakete gibt oder so. Dann
nehmen Sie natürlich am besten die neue eventuell umbenannte Version.
\begin{Shaded}
\begin{Highlighting}[]
\CommentTok{\# installiere tidyverse:}
\FunctionTok{install.packages}\NormalTok{(}\StringTok{"tidyverse"}\NormalTok{) }
\DocumentationTok{\#\# installiere die neuste Version von tidycomm}
\CommentTok{\# Hier werden Sie gefragt, ob Sie versuchen möchten zu kompilieren und sagen "Yes" oder "no", wenn ersteres nicht klappt}
\CommentTok{\# jetzt installiere tidycomm}
\NormalTok{remotes}\SpecialCharTok{::}\FunctionTok{install\_github}\NormalTok{(}\StringTok{"joon{-}e/tidycomm"}\NormalTok{)}
\end{Highlighting}
\end{Shaded}
\hypertarget{die-vorlagen}{%
\section{Die Vorlagen}\label{die-vorlagen}}
Laden Sie diesen Zip-Ornder runter und speichern Sie ihn irgendwo (am
besten in einem SWITCH-Drive-Ordner). Entpacken Sie den Ordner (meistens
reicht der Doppelklick). In dem Ordner finden sie einige Dateien. Eine
Datei heisst \enquote{Bericht.Rproj}. Öffnen Sie die mal. Dann finden
Sie im Panel rechts unten einige Dateien. Öffnen Sie
\enquote{index.Rmd}. Da ist das Setup drin und die Einleitung. Wenn Sie
die öffnen und noch nicht alle Pakete installiert haben, die dafür
benötigt werden, dann zeigt Ihnen R-Studio oben im Hauptfenster ein
schmales gelbes Band an, in dem Sie darauf hingewiesen werden, dass
nicht alle Pakete installiert sind. Dort können Sie die Installation
direkt und automatisch starten lassen. Das dauert dann eine Weile, aber
irgendwann ist es fertig. :-) Wenn die schrittweise Intallation
glattgelaufen ist, sollten Sie rechts oben einen Reiter sehen, der
\enquote{Build} heisst. Wenn Sie darauf gehen, sehen Sie einen neuen
Schalter mit einem Hammer darauf. Klicken Sie da den Pfeil nach unten
und dann auf \enquote{bookdown::pdf\_book} (Wenn hier nur Website steht,
dann starten Sie R nach der Installation nochmal neu). Dann warten Sie
(beim ersten Mal mit viel Geduld über 15-30 Minuten!). Am Ende sollte
Ihnen ein PDF angezeight werden.
\bookmarksetup{startatroot}
\hypertarget{fehler-erkennen-und-luxf6sen}{%
\chapter{Fehler erkennen und lösen}\label{fehler-erkennen-und-luxf6sen}}
\hypertarget{vorgehen-bei-fehlern}{%
\section{Vorgehen bei Fehlern}\label{vorgehen-bei-fehlern}}
\emph{Problemlösungsworkflow (je Schritt 15 Minuten)}
\begin{enumerate}
\def\labelenumi{\arabic{enumi}.}
\item
Fragen Sie erst sich, was wohl die Fehlermeldung heissen könnte und
was anders ist zu Vorlagen und Beispielen (und google bzw. auf Stack
Overflow suchen),
\item
dann Ihre AG-Kollegen,
\item
bei Task-Force-Aufgaben Ihre Task-Force-Kolleg:innen (zB TF D auf
MS-Teams)
\item
dann Ihre AG E,
\item
dann im Forum auf OLAT,
\item
dann direkt an
\href{mailto:[email protected]}{\nolinkurl{[email protected]}}
oder auf Teams \enquote{Fretwurst} oder \enquote{Nadia},
\item
Stack Overflow mit \enquote{reprex} bzw. \enquote{mwe},
\item
Externe direkt (keine Mails an Martin Wettstein). Eher fragt Fretwurst
bei Paketautoren.
\end{enumerate}
\hypertarget{bei-fragen-zu-fehlern-mitzugeben}{%
\section{Bei Fragen zu Fehlern
mitzugeben}\label{bei-fragen-zu-fehlern-mitzugeben}}
Wenn Sie Fehlermeldungen bekommen, senden Sie nicht einfach nur
Screenshots. Damit kann niemand etwas anfangen. Wenn Ihnen geholfen
werden soll, müssen Sie die R-Zeilen (bzw. die R-Script-Datei) sowie den
zugrundeliegenden Datensatz mitliefern und mitteilen, wo der Fehler
auftritt.
Zu Ihren Fragen liefern Sie also bitte immer:
\begin{enumerate}
\def\labelenumi{\arabic{enumi}.}
\item
die Datendatei (als .RDS, .RData oder Excel-Datei),
\item
Betroffener Befehl muss mitgeliefert werden als Text. Im Idealfall die
.Rmd mit Zeilenhinweis (lokalisieren Sie den Fehler innerhalb einer
Pipe).
\item
Den Fehleroutput als Text und zusätzlich gerne als Screenshot.
\item
Was schon probiert wurde.
\end{enumerate}
\hypertarget{typische-fehler-erkennen-und-beheben}{%
\section{Typische Fehler erkennen und
beheben}\label{typische-fehler-erkennen-und-beheben}}
Die häufigsten Fehler und Lösungen sind:
\begin{enumerate}
\def\labelenumi{\arabic{enumi}.}
\item
Pakete sind nicht installiert: Tools -\textgreater{} \enquote{Install
Packages} Paket installieren
\item
Pakete sind nicht geladen: Paket laden library(Paketname) und
index.Rmd nutzen, um alle nötigen Pakete in der richtigen Reihenfolge
zu laden
\item
Datensätze können nicht gefunden werden: Den richtigen Pfad einstellen
mit Unterordner zB DATEN\_BF \textless-
readRDS(\enquote{Daten/DATEN\_BF.RDS})
\item
Datenobjekt wird nicht gefunden, weil es noch nicht geladen wurde:
Daten laden zB DATEN\_BF \textless-
readRDS(\enquote{Daten/DATEN\_BF.RDS})
\item
Datenobjekt wird nicht gefunden, weil es falsch geschrieben ist:
Kontrollieren Sie auch Gross-Klein-Schreibung
\item
Variable wird nicht gefunden, weil sie falsch geschrieben ist:
Schreiben Sie den Variablennamen neu und schauen Sie ob sie ihn in der
Hilfsliste sehen.
\item
Kommata oder Klammern fehlen oder sind zu viel: Es wird links in R ein
roter Kreis mit weissem x angezeigt. Wenn Sie da drauf gehen, sagt
Ihnen R-Studio in der Regel was fehlt oder zu viel ist.
\item
Es werden mehrere Zeilen grün ausgeführt, aber es passiert nichts
weiter: Schauen Sie ob am Ende ein Magritter (\%\textgreater\%) zu
viel ist.
\item
Es kann \enquote{eine Funktion nicht gefunden} werden, weil ein Paket
fehlt oder die Funktion ist falsch geschrieben ist: Googlen Sie die
Funktion und schauen, aus welchem Paket die ist. Sie können dann
probieren, ob¬ es mit Paketname::Funktion geht zB janitor::percent.
\item
Variablen sind vom falschen Typ: Wandeln Sie den Typ um. ZB: DATEN\_BF
\%\textgreater\% mutate(Nachricht = as.numeric(Nachricht)).
\end{enumerate}
Googlen Sie Ihre Fehlermeldungen oder Funktionen, die Fehler erzeugen
und schauen sich den Syntax an, wie die Funktionen geschrieben sein
sollten. Üben Sie sich in Frustrationstolleranz. Haben Sie geduld und
suchen Sie den Fehler im Detail.
\href{https://www.uni-muenster.de/imperia/md/content/psyifp/ae_holling/r-fehlermeldungen.pdf}{Ein
Kollege gibt hier ein paar Hinweise wie Fehler in R lesbar sind in einer
PDF-Datei.} Hier habe ich noch ein Video mit typischen Fehlern und
Lösungen:
\bookmarksetup{startatroot}
\hypertarget{relitest}{%
\chapter{Relitest}\label{relitest}}
Dazu gibt es auch ein Video:
\begin{verbatim}
## -- Attaching packages ------------------------------------------------- tidyverse 1.3.2 --
## v ggplot2 3.4.0 v purrr 1.0.1
## v tibble 3.1.8 v dplyr 1.0.10
## v tidyr 1.2.1 v stringr 1.5.0
## v readr 2.1.3 v forcats 0.5.2
## -- Conflicts ---------------------------------------------------- tidyverse_conflicts() --
## x dplyr::filter() masks stats::filter()
## x dplyr::lag() masks stats::lag()
\end{verbatim}
Hier finden Sie den im Video erwähnten gezippten Ordner mit der
Relitest.Rmd. Den Ordner müssen Sie entpacken und an eine gute Stelle in
ihrem System tun. In dem Ordner wo sich diese Datei
\enquote{Relitest.Rmd} befindet, muss es einen Unterordner mit der
Bezeichnung \enquote{Daten} geben, wo die Excel-Dateien
\enquote{RelidatenCoder1.xlsx} usw. liegen. s \#\# Relidaten
Zusammenbinden
Sie werden die Inhaltsanalyse in Excel kodieren. Die Exceldateien müssen
dann in R importiert werden. Das geht zB mit \textbf{read\_xlsx} des
Pakets \textbf{read.xl}. Wie Sie sehen werden die Exceldateien der Coder
(im Beispiel 1 bis 3) jeweils in R-Dateien eingelesen (RelitestCoder1
\textless- \ldots) und dann mit dem Befehl rbind (steht für Rows
aneinander binden) zu einer Datei zusammengefügt, die dann angeschaut
oder für Relitests weiterverarbeitet werden kann.
\begin{Shaded}
\begin{Highlighting}[]
\CommentTok{\# Lade alle Relitestdateien aus dem Ordner "Daten" (den es geben muss mit allen Relidateien):}
\NormalTok{RelitestCoder1 }\OtherTok{\textless{}{-}}\NormalTok{ readxl}\SpecialCharTok{::}\FunctionTok{read\_excel}\NormalTok{(}\StringTok{"Daten/RelidatenCoder1.xlsx"}\NormalTok{)}
\NormalTok{RelitestCoder2 }\OtherTok{\textless{}{-}}\NormalTok{ readxl}\SpecialCharTok{::}\FunctionTok{read\_excel}\NormalTok{(}\StringTok{"Daten/RelidatenCoder2.xlsx"}\NormalTok{)}
\NormalTok{RelitestCoder3 }\OtherTok{\textless{}{-}}\NormalTok{ readxl}\SpecialCharTok{::}\FunctionTok{read\_excel}\NormalTok{(}\StringTok{"Daten/Klausis erster Relitest.xlsx"}\NormalTok{)}
\CommentTok{\# Binde die Relidatensätze der Coder:innen zu einem Datenobjekt "RelitestGesamt zusammen:}
\NormalTok{Relitest\_Gesamt }\OtherTok{\textless{}{-}} \FunctionTok{rbind}\NormalTok{(RelitestCoder1, RelitestCoder2, RelitestCoder3) }
\NormalTok{Relitest\_Gesamt }\SpecialCharTok{|\textgreater{}}
\NormalTok{ dplyr}\SpecialCharTok{::}\FunctionTok{select}\NormalTok{(CODER, CU) }\SpecialCharTok{|\textgreater{}}
\NormalTok{ dplyr}\SpecialCharTok{::}\FunctionTok{mutate}\NormalTok{(}\AttributeTok{Fehler =} \FunctionTok{ifelse}\NormalTok{(}\FunctionTok{is.na}\NormalTok{(CODER) }\SpecialCharTok{|} \FunctionTok{is.na}\NormalTok{(CU), }\StringTok{"FEHLER! Muss in der RelitestGesamt.xlsx repariert und als Relitest\_bearbeitet.xlsx gespeichert werden oder der:die Coder:in muss es überarbeiten"}\NormalTok{, }\StringTok{"alles gut"}\NormalTok{)) }\SpecialCharTok{|\textgreater{}}
\NormalTok{ dplyr}\SpecialCharTok{::}\FunctionTok{count}\NormalTok{(Fehler)}
\DocumentationTok{\#\# \# A tibble: 2 x 2}
\DocumentationTok{\#\# Fehler n}