\documentclass[10pt,a4paper]{article}

% Packages
\usepackage{fancyhdr}           % For header and footer
\usepackage{multicol}           % Allows multicols in tables
\usepackage{tabularx}           % Intelligent column widths
\usepackage{tabulary}           % Used in header and footer
\usepackage{hhline}             % Border under tables
\usepackage{graphicx}           % For images
\usepackage{xcolor}             % For hex colours
%\usepackage[utf8x]{inputenc}    % For unicode character support
\usepackage[T1]{fontenc}        % Without this we get weird character replacements
\usepackage{colortbl}           % For coloured tables
\usepackage{setspace}           % For line height
\usepackage{lastpage}           % Needed for total page number
\usepackage{seqsplit}           % Splits long words.
%\usepackage{opensans}          % Can't make this work so far. Shame. Would be lovely.
\usepackage[normalem]{ulem}     % For underlining links
% Most of the following are not required for the majority
% of cheat sheets but are needed for some symbol support.
\usepackage{amsmath}            % Symbols
\usepackage{MnSymbol}           % Symbols
\usepackage{wasysym}            % Symbols
%\usepackage[english,german,french,spanish,italian]{babel}              % Languages

% Document Info
\author{user111}
\pdfinfo{
  /Title (r-basic.pdf)
  /Creator (Cheatography)
  /Author (user111)
  /Subject (R BASIC Cheat Sheet)
}

% Lengths and widths
\addtolength{\textwidth}{6cm}
\addtolength{\textheight}{-1cm}
\addtolength{\hoffset}{-3cm}
\addtolength{\voffset}{-2cm}
\setlength{\tabcolsep}{0.2cm} % Space between columns
\setlength{\headsep}{-12pt} % Reduce space between header and content
\setlength{\headheight}{85pt} % If less, LaTeX automatically increases it
\renewcommand{\footrulewidth}{0pt} % Remove footer line
\renewcommand{\headrulewidth}{0pt} % Remove header line
\renewcommand{\seqinsert}{\ifmmode\allowbreak\else\-\fi} % Hyphens in seqsplit
% This two commands together give roughly
% the right line height in the tables
\renewcommand{\arraystretch}{1.3}
\onehalfspacing

% Commands
\newcommand{\SetRowColor}[1]{\noalign{\gdef\RowColorName{#1}}\rowcolor{\RowColorName}} % Shortcut for row colour
\newcommand{\mymulticolumn}[3]{\multicolumn{#1}{>{\columncolor{\RowColorName}}#2}{#3}} % For coloured multi-cols
\newcolumntype{x}[1]{>{\raggedright}p{#1}} % New column types for ragged-right paragraph columns
\newcommand{\tn}{\tabularnewline} % Required as custom column type in use

% Font and Colours
\definecolor{HeadBackground}{HTML}{333333}
\definecolor{FootBackground}{HTML}{666666}
\definecolor{TextColor}{HTML}{333333}
\definecolor{DarkBackground}{HTML}{A3380A}
\definecolor{LightBackground}{HTML}{F9F2EF}
\renewcommand{\familydefault}{\sfdefault}
\color{TextColor}

% Header and Footer
\pagestyle{fancy}
\fancyhead{} % Set header to blank
\fancyfoot{} % Set footer to blank
\fancyhead[L]{
\noindent
\begin{multicols}{3}
\begin{tabulary}{5.8cm}{C}
    \SetRowColor{DarkBackground}
    \vspace{-7pt}
    {\parbox{\dimexpr\textwidth-2\fboxsep\relax}{\noindent
        \hspace*{-6pt}\includegraphics[width=5.8cm]{/web/www.cheatography.com/public/images/cheatography_logo.pdf}}
    }
\end{tabulary}
\columnbreak
\begin{tabulary}{11cm}{L}
    \vspace{-2pt}\large{\bf{\textcolor{DarkBackground}{\textrm{R BASIC Cheat Sheet}}}} \\
    \normalsize{by \textcolor{DarkBackground}{user111} via \textcolor{DarkBackground}{\uline{cheatography.com/37570/cs/11844/}}}
\end{tabulary}
\end{multicols}}

\fancyfoot[L]{ \footnotesize
\noindent
\begin{multicols}{3}
\begin{tabulary}{5.8cm}{LL}
  \SetRowColor{FootBackground}
  \mymulticolumn{2}{p{5.377cm}}{\bf\textcolor{white}{Cheatographer}}  \\
  \vspace{-2pt}user111 \\
  \uline{cheatography.com/user111} \\
  \end{tabulary}
\vfill
\columnbreak
\begin{tabulary}{5.8cm}{L}
  \SetRowColor{FootBackground}
  \mymulticolumn{1}{p{5.377cm}}{\bf\textcolor{white}{Cheat Sheet}}  \\
   \vspace{-2pt}Not Yet Published.\\
   Updated 22nd May, 2017.\\
   Page {\thepage} of \pageref{LastPage}.
\end{tabulary}
\vfill
\columnbreak
\begin{tabulary}{5.8cm}{L}
  \SetRowColor{FootBackground}
  \mymulticolumn{1}{p{5.377cm}}{\bf\textcolor{white}{Sponsor}}  \\
  \SetRowColor{white}
  \vspace{-5pt}
  %\includegraphics[width=48px,height=48px]{dave.jpeg}
  Measure your website readability!\\
  www.readability-score.com
\end{tabulary}
\end{multicols}}




\begin{document}
\raggedright
\raggedcolumns

% Set font size to small. Switch to any value
% from this page to resize cheat sheet text:
% www.emerson.emory.edu/services/latex/latex_169.html
\footnotesize % Small font.

\begin{multicols*}{3}

\begin{tabularx}{5.377cm}{x{1.44333 cm} x{3.53367 cm} }
\SetRowColor{DarkBackground}
\mymulticolumn{2}{x{5.377cm}}{\bf\textcolor{white}{Basic of basic}}  \tn
% Row 0
\SetRowColor{LightBackground}
print & no need any other exp \tn 
% Row Count 1 (+ 1)
% Row 1
\SetRowColor{white}
\seqsplit{exponentiation} & \textasciicircum{} \tn 
% Row Count 3 (+ 2)
% Row 2
\SetRowColor{LightBackground}
modulo & \%\% \tn 
% Row Count 4 (+ 1)
% Row 3
\SetRowColor{white}
assignment & = or \textless{}- \tn 
% Row Count 5 (+ 1)
% Row 4
\SetRowColor{LightBackground}
equal sign & == \tn 
% Row Count 6 (+ 1)
% Row 5
\SetRowColor{white}
case sensitive & YES \tn 
% Row Count 8 (+ 2)
% Row 6
\SetRowColor{LightBackground}
or & | \tn 
% Row Count 9 (+ 1)
% Row 7
\SetRowColor{white}
double operators & \&\&, || only examine 1st elements in vectors \tn 
% Row Count 11 (+ 2)
\hhline{>{\arrayrulecolor{DarkBackground}}--}
\end{tabularx}
\par\addvspace{1.3em}

\begin{tabularx}{5.377cm}{x{1.34379 cm} x{3.63321 cm} }
\SetRowColor{DarkBackground}
\mymulticolumn{2}{x{5.377cm}}{\bf\textcolor{white}{Factor}}  \tn
% Row 0
\SetRowColor{LightBackground}
\mymulticolumn{2}{x{5.377cm}}{factor()} \tn 
% Row Count 1 (+ 1)
% Row 1
\SetRowColor{white}
2 types & nominal vs. ordinal \tn 
% Row Count 2 (+ 1)
\hhline{>{\arrayrulecolor{DarkBackground}}--}
\end{tabularx}
\par\addvspace{1.3em}

\begin{tabularx}{5.377cm}{x{0.9954 cm} x{3.9816 cm} }
\SetRowColor{DarkBackground}
\mymulticolumn{2}{x{5.377cm}}{\bf\textcolor{white}{Data structures}}  \tn
% Row 0
\SetRowColor{LightBackground}
vector & c() one dim-array, same data type, arithmetic calculations OK, names() \tn 
% Row Count 3 (+ 3)
% Row 1
\SetRowColor{white}
matrix & two dim-array, same data type, arithmetic calculations OK \tn 
% Row Count 5 (+ 2)
% Row 2
\SetRowColor{LightBackground}
data frame & two dim-object, different data types \tn 
% Row Count 7 (+ 2)
% Row 3
\SetRowColor{white}
list & 1 dim object, different data types \tn 
% Row Count 9 (+ 2)
\hhline{>{\arrayrulecolor{DarkBackground}}--}
\SetRowColor{LightBackground}
\mymulticolumn{2}{x{5.377cm}}{df is a list where each element is a column so df{[}{[}col{]}{]} equals column}  \tn 
\hhline{>{\arrayrulecolor{DarkBackground}}--}
\end{tabularx}
\par\addvspace{1.3em}

\begin{tabularx}{5.377cm}{X}
\SetRowColor{DarkBackground}
\mymulticolumn{1}{x{5.377cm}}{\bf\textcolor{white}{FUNCTION}}  \tn
% Row 0
\SetRowColor{LightBackground}
\mymulticolumn{1}{x{5.377cm}}{fun \textless{}- function(arg1, arg2) \{...\}} \tn 
% Row Count 1 (+ 1)
% Row 1
\SetRowColor{white}
\mymulticolumn{1}{x{5.377cm}}{3 elements: arguments, body, environment} \tn 
% Row Count 2 (+ 1)
% Row 2
\SetRowColor{LightBackground}
\mymulticolumn{1}{x{5.377cm}}{return() stop execution and return a value, used to return early for special cases not routinely} \tn 
% Row Count 4 (+ 2)
% Row 3
\SetRowColor{white}
\mymulticolumn{1}{x{5.377cm}}{functions are objects} \tn 
% Row Count 5 (+ 1)
% Row 4
\SetRowColor{LightBackground}
\mymulticolumn{1}{x{5.377cm}}{descriptive, use consistent naming convention, no overriding existing object names, data args come first} \tn 
% Row Count 8 (+ 3)
% Row 5
\SetRowColor{white}
\mymulticolumn{1}{x{5.377cm}}{functions can be arguments to other functions -{}-\textgreater{} functional programming} \tn 
% Row Count 10 (+ 2)
% Row 6
\SetRowColor{LightBackground}
\mymulticolumn{1}{x{5.377cm}}{pipe operator: \%\textgreater{}\%} \tn 
% Row Count 11 (+ 1)
% Row 7
\SetRowColor{white}
\mymulticolumn{1}{x{5.377cm}}{safely(), possibly(), quietly() - handling errors} \tn 
% Row Count 12 (+ 1)
% Row 8
\SetRowColor{LightBackground}
\mymulticolumn{1}{x{5.377cm}}{side effects: beyond the results of a function, i.e. print output, plot, save files to disk} \tn 
% Row Count 14 (+ 2)
% Row 9
\SetRowColor{white}
\mymulticolumn{1}{x{5.377cm}}{3 main problems: type-unstable functions( {[}, sapply), non-standard evaluation, hidden arguments} \tn 
% Row Count 16 (+ 2)
% Row 10
\SetRowColor{LightBackground}
\mymulticolumn{1}{x{5.377cm}}{stop("error msg", call. = FALSE)} \tn 
% Row Count 17 (+ 1)
% Row 11
\SetRowColor{white}
\mymulticolumn{1}{x{5.377cm}}{view global options: options(), getOption("digits")} \tn 
% Row Count 19 (+ 2)
\hhline{>{\arrayrulecolor{DarkBackground}}-}
\SetRowColor{LightBackground}
\mymulticolumn{1}{x{5.377cm}}{purr - map(), map\_dbl(), map\_int(), etc. apply the same function to a list. Similar to the apply family - sapply(), lapply() \newline map2(.x, .y, .f, ...), pmap(.l, .f, ...) - multiple args \newline invoke\_map(.f, .x = list(NULL), ...) - multiple functions \newline walk() similar to map() but for side effects}  \tn 
\hhline{>{\arrayrulecolor{DarkBackground}}-}
\end{tabularx}
\par\addvspace{1.3em}

\begin{tabularx}{5.377cm}{x{1.74195 cm} x{3.23505 cm} }
\SetRowColor{DarkBackground}
\mymulticolumn{2}{x{5.377cm}}{\bf\textcolor{white}{Basic functions}}  \tn
% Row 0
\SetRowColor{LightBackground}
class() & str() \tn 
% Row Count 1 (+ 1)
% Row 1
\SetRowColor{white}
rbind(), cbind() & colSums(), rowSums(), nrow(), ncol() \tn 
% Row Count 3 (+ 2)
% Row 2
\SetRowColor{LightBackground}
data.frame(), subset() & order(), arrange(), rank() \tn 
% Row Count 5 (+ 2)
% Row 3
\SetRowColor{white}
file.path() & return file path \tn 
% Row Count 6 (+ 1)
% Row 4
\SetRowColor{LightBackground}
seq\_along() & generate sequence for "for loop" can handle empty cases \tn 
% Row Count 9 (+ 3)
\hhline{>{\arrayrulecolor{DarkBackground}}--}
\end{tabularx}
\par\addvspace{1.3em}

\begin{tabularx}{5.377cm}{x{2.53827 cm} x{2.43873 cm} }
\SetRowColor{DarkBackground}
\mymulticolumn{2}{x{5.377cm}}{\bf\textcolor{white}{Subsetting}}  \tn
% Row 0
\SetRowColor{LightBackground}
\mymulticolumn{2}{x{5.377cm}}{starts from 1} \tn 
% Row Count 1 (+ 1)
% Row 1
\SetRowColor{white}
{[}2:5{]} equals to & c(2,3,4,5) \tn 
% Row Count 2 (+ 1)
% Row 2
\SetRowColor{LightBackground}
df{[} ,1{]} & 1st column \tn 
% Row Count 3 (+ 1)
% Row 3
\SetRowColor{white}
df{[}1, {]} & 1st row \tn 
% Row Count 4 (+ 1)
% Row 4
\SetRowColor{LightBackground}
df{[}2,3{]} & 2nd row \& 3rd column \tn 
% Row Count 6 (+ 2)
% Row 5
\SetRowColor{white}
df\$x & select element name x \tn 
% Row Count 8 (+ 2)
% Row 6
\SetRowColor{LightBackground}
ls{[}x{]} vs. ls{[}{[}x{]}{]} or \$ & sublist vs. element \tn 
% Row Count 10 (+ 2)
\hhline{>{\arrayrulecolor{DarkBackground}}--}
\end{tabularx}
\par\addvspace{1.3em}

\begin{tabularx}{5.377cm}{X}
\SetRowColor{DarkBackground}
\mymulticolumn{1}{x{5.377cm}}{\bf\textcolor{white}{IF Syntax}}  \tn
\SetRowColor{LightBackground}
\mymulticolumn{1}{x{5.377cm}}{if (condition1) \{ \newline   ex1 \newline \} else if (condition2) \{ \newline   ex2 \newline \} else \{ \newline   ex3 \newline \}} \tn 
\hhline{>{\arrayrulecolor{DarkBackground}}-}
\end{tabularx}
\par\addvspace{1.3em}

\begin{tabularx}{5.377cm}{X}
\SetRowColor{DarkBackground}
\mymulticolumn{1}{x{5.377cm}}{\bf\textcolor{white}{FOR syntax}}  \tn
\SetRowColor{LightBackground}
\mymulticolumn{1}{x{5.377cm}}{for (i in list) \{ \newline   print(i) \newline \} \newline  \newline for (i in 1:length(list)) \{ \newline   print(list{[}{[}i{]}{]}) \newline \}} \tn 
\hhline{>{\arrayrulecolor{DarkBackground}}-}
\end{tabularx}
\par\addvspace{1.3em}

\begin{tabularx}{5.377cm}{X}
\SetRowColor{DarkBackground}
\mymulticolumn{1}{x{5.377cm}}{\bf\textcolor{white}{break \& next}}  \tn
\SetRowColor{white}
\mymulticolumn{1}{x{5.377cm}}{break - abandons the active loop: the remaining code in the loop is skipped and the loop is not iterated over anymore. \newline % Row Count 3 (+ 3)
next - skips the remainder of the code in the loop, but continues the iteration.% Row Count 5 (+ 2)
} \tn 
\hhline{>{\arrayrulecolor{DarkBackground}}-}
\end{tabularx}
\par\addvspace{1.3em}

\begin{tabularx}{5.377cm}{X}
\SetRowColor{DarkBackground}
\mymulticolumn{1}{x{5.377cm}}{\bf\textcolor{white}{Importing data}}  \tn
% Row 0
\SetRowColor{LightBackground}
\mymulticolumn{1}{x{5.377cm}}{read.csv(), read.delim()} \tn 
% Row Count 1 (+ 1)
% Row 1
\SetRowColor{white}
\mymulticolumn{1}{x{5.377cm}}{read.csv2(), read.delim2() - local diff. in decimal convention} \tn 
% Row Count 3 (+ 2)
% Row 2
\SetRowColor{LightBackground}
\mymulticolumn{1}{x{5.377cm}}{read.table("foo.txt", header = TRUE, sep = "/", stringsAsFactors = FALSE)} \tn 
% Row Count 5 (+ 2)
% Row 3
\SetRowColor{white}
\mymulticolumn{1}{x{5.377cm}}{readxl - read\_excel("foo.xlsx", sheet=bar); \seqsplit{lapply(excel\_sheets("foo}.xlsx"), read\_excel, path = "foo.xlsx")} \tn 
% Row Count 8 (+ 3)
% Row 4
\SetRowColor{LightBackground}
\mymulticolumn{1}{x{5.377cm}}{XLConnect - loadWorkbook(), getSheets(), readWorksheet() \& a lots more} \tn 
% Row Count 10 (+ 2)
% Row 5
\SetRowColor{white}
\mymulticolumn{1}{x{5.377cm}}{read SQL - DBI, dbListTables, dbReadTable, dbGetQuery(efficient!)} \tn 
% Row Count 12 (+ 2)
% Row 6
\SetRowColor{LightBackground}
\mymulticolumn{1}{x{5.377cm}}{read JSON - jsonlite: fromJSON()} \tn 
% Row Count 13 (+ 1)
% Row 7
\SetRowColor{white}
\mymulticolumn{1}{x{5.377cm}}{read stats. software - haven, foreign} \tn 
% Row Count 14 (+ 1)
\hhline{>{\arrayrulecolor{DarkBackground}}-}
\SetRowColor{LightBackground}
\mymulticolumn{1}{x{5.377cm}}{packages: readr - similar to utils but simpler; data.table:fread - fast, convenient}  \tn 
\hhline{>{\arrayrulecolor{DarkBackground}}-}
\end{tabularx}
\par\addvspace{1.3em}


% That's all folks
\end{multicols*}

\end{document}