111 lines
3.5 KiB
Plaintext
111 lines
3.5 KiB
Plaintext
\documentclass[floatsintext, man, draftfirst]{apa7}
|
|
<<init,echo=FALSE>>=
|
|
library(knitr)
|
|
library(ggplot2)
|
|
library(data.table)
|
|
knitr::opts_chunk$set(fig.show='hold')
|
|
f <- function (x) {formatC(x, format="d", big.mark=',')}
|
|
format.percent <- function(x) {paste(f(x*100),"\\%",sep='')}
|
|
|
|
theme_set(theme_bw())
|
|
source('resources/functions.R')
|
|
source('resources/variables.R')
|
|
@
|
|
|
|
% maxwidth is the original width if it is less than linewidth
|
|
% otherwise use linewidth (to make sure the graphics do not exceed the margin)
|
|
\makeatletter
|
|
\def\maxwidth{ %
|
|
\ifdim\Gin@nat@width>\linewidth
|
|
\linewidth
|
|
\else
|
|
\Gin@nat@width
|
|
\fi
|
|
}
|
|
|
|
\usepackage{alltt}
|
|
|
|
|
|
\usepackage{epstopdf}% To incorporate .eps illustrations using PDFLaTeX, etc.
|
|
\usepackage{subcaption}% Support for small, `sub' figures and tables
|
|
\usepackage{tikz}
|
|
\usetikzlibrary{positioning, shapes, arrows, shadows}
|
|
|
|
\def \parrotpdf {\includegraphics[]{parrot.pdf}}
|
|
\DeclareUnicodeCharacter{1F99C}{\parrotpdf}
|
|
\usepackage{tabularx}
|
|
\usepackage[utf8]{inputenc}
|
|
\usepackage{wrapfig}
|
|
\usepackage[T1]{fontenc}
|
|
\usepackage{textcomp}
|
|
% \usepackage[garamond]{mathdesign}
|
|
|
|
% \usepackage[letterpaper,left=1in,right=1in,top=1in,bottom=1in]{geometry}
|
|
|
|
% packages i use in essentially every document
|
|
\usepackage{graphicx}
|
|
\usepackage{enumerate}
|
|
|
|
% packages i use in many documents but leave off by default
|
|
\usepackage{amsmath}%}, amsthm, amssymb}
|
|
\DeclareMathOperator*{\argmin}{arg\,min} % thin space, limits underneath in displays
|
|
\DeclareMathOperator*{\argmax}{arg\,max} % thin space, limits underneath in displays
|
|
|
|
|
|
\usepackage{subcaption}
|
|
% import and customize urls
|
|
% \usepackage[usenames,dvipsnames]{color}
|
|
% \usepackage[breaklinks]{hyperref}
|
|
|
|
\hypersetup{colorlinks=true, linkcolor=black, citecolor=black, filecolor=blue,
|
|
urlcolor=blue, unicode=true}
|
|
|
|
% add bibliographic stuff
|
|
\usepackage[american]{babel}
|
|
\usepackage{csquotes}
|
|
\usepackage[natbib=true, style=apa, sortcites=true, backend=biber]{biblatex}
|
|
\addbibresource{Bibliography.bib}
|
|
\DeclareLanguageMapping{american}{american-apa}
|
|
|
|
\defbibheading{secbib}[\bibname]{%
|
|
\section*{#1}%
|
|
\markboth{#1}{#1}%
|
|
\baselineskip 14.2pt%
|
|
\prebibhook}
|
|
|
|
\def\citepos#1{\citeauthor{#1}'s (\citeyear{#1})}
|
|
\def\citespos#1{\citeauthor{#1}' (\citeyear{#1})}
|
|
\newcommand\TODO[1]{\textsc{\color{red} #1}}
|
|
|
|
% I've gotten advice to make this as general as possible to attract the widest possible audience.
|
|
\title{Appendices for: What to do about prediction errors in automated content analysis}
|
|
|
|
\shorttitle{Appendices: Prediction errors in automated content analysis}
|
|
|
|
\authorsnames[1,2,3]{Nathan TeBlunthuis, Valerie Hase, Chung-hong Chan}
|
|
\authorsaffiliations{{Northwestern University}, {LMU Munich}, {GESIS - Leibniz-Institut für Sozialwissenschaften}}
|
|
\leftheader{TeBlunthuis, Hase \& Chan}
|
|
|
|
\keywords{
|
|
Content Analysis; Machine Learning; Classification Error; Attenuation Bias; Simulation; Computational Methods; Big Data; AI;
|
|
}
|
|
|
|
\IfFileExists{upquote.sty}{\usepackage{upquote}}{}
|
|
|
|
\abstract{}
|
|
\begin{document}
|
|
\maketitle
|
|
\section{Additional plots from Simulations 1 and 2}
|
|
\label{appendix:main.sim.plots}
|
|
\begin{figure}
|
|
<<example1.g,echo=FALSE, message=FALSE, warning=FALSE, result='asis', dev='pdf', fig.width=6, fig.asp=.625,cache=F>>=
|
|
|
|
p <- plot.simulation.iv(plot.df.example.1,iv='z')
|
|
|
|
grid.draw(p)
|
|
@
|
|
\caption{Estimates of $B_z$ in multivariate regression with $X$ measured using machine learning and model accuracy independent of $X$, $Y$, and $Z$. All methods obtain precise and accurate estimates given sufficient validation data.}
|
|
\end{figure}
|
|
|
|
|
|
\end{document} |