\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{Wllyssys Alves (ulima69)}
\pdfinfo{
  /Title (r-resumo.pdf)
  /Creator (Cheatography)
  /Author (Wllyssys Alves (ulima69))
  /Subject (R Resumo 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}{A3A3A3}
\definecolor{LightBackground}{HTML}{F3F3F3}
\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 Resumo Cheat Sheet}}}} \\
    \normalsize{by \textcolor{DarkBackground}{Wllyssys Alves (ulima69)} via \textcolor{DarkBackground}{\uline{cheatography.com/58179/cs/20276/}}}
\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}Wllyssys Alves (ulima69) \\
  \uline{cheatography.com/ulima69} \\
  \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 16th August, 2019.\\
   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}
\SetRowColor{DarkBackground}
\mymulticolumn{1}{x{5.377cm}}{\bf\textcolor{white}{Operadores}}  \tn
\SetRowColor{LightBackground}
\mymulticolumn{1}{x{5.377cm}}{7 + 7      \# soma \newline 7 - 4       \# subtração \newline 5 {\emph{ 5       \# multiplicação \newline 6 / 6       \# divisão \newline 3\textasciicircum{}2         \# exponenciação \newline 3}}*2        \# exponenciação \newline 16 \%\% 3 \# módulo} \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}{Operadores Relacionais}}  \tn
\SetRowColor{LightBackground}
\mymulticolumn{1}{x{5.377cm}}{\# Atribuindo variáveis \newline x = 7 \newline y = 5 \newline  \newline \# Operadores de comparação \newline x \textgreater{} 8 \newline x \textless{} 8 \newline x \textless{}= 8 \newline x \textgreater{}= 8 \newline x == 8 \newline x != 8 \newline  \newline \# Operadores lógicos \newline \# And \newline (x==8) \& (x==6) \newline (x==7) \& (x\textgreater{}=5) \newline (x==8) \& (x==7) \newline  \newline \# Or \newline (x==8) | (x\textgreater{}5) \newline (x==8) | (x\textgreater{}=5) \newline  \newline \# Not \newline x \textgreater{} 8 \newline print(!x \textgreater{} 8)} \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}{Fatores}}  \tn
\SetRowColor{LightBackground}
\mymulticolumn{1}{x{5.377cm}}{\# Variáveis categóricas nominais \newline \# Separando os fatores de uma lista \newline vec1 \textless{}- c("Macho","Femea","Femea","Macho","Macho") \newline vec1 \newline fac\_vec1 \textless{}- factor(vec1) \newline fac\_vec1 \newline \textgreater{}{[}1{]} Macho Femea Femea Macho Macho \newline \textgreater{}Levels: Femea Macho \newline  \newline \# Não existe uma ordem implícita \newline \# então é atribuída a ordem alfabética \newline animais \textless{}- c("Zebra", "Pantera", "Rinoceronte", "Macaco", "Tigre") \newline fac\_animais \textless{}- factor(animais) \newline fac\_animais \newline \textgreater{}{[}1{]} Zebra       Pantera     Rinoceronte Macaco      Tigre       \newline \textgreater{}Levels: Macaco Pantera Rinoceronte Tigre Zebra \newline  \newline \# Variáveis categóricas ordinais \newline \# Possuem uma ordem natural \newline grad \textless{}- c("Mestrado", "Doutorado", "Bacharelado", "Mestrado", "Mestrado") \newline fac\_grad \textless{}- factor(grad, order = TRUE, levels = c("Bacharelado", "Mestrado", "Doutorado")) \newline fac\_grad \newline levels(fac\_grad) \newline \textgreater{}{[}1{]} Mestrado    Doutorado   Bacharelado Mestrado    Mestrado    \newline \textgreater{}Levels: Bacharelado \textless{} Mestrado \textless{} Doutorado \newline  \newline \# Quantos existem por fator \newline summary(fac\_grad) \newline \textgreater{}Bacharelado    Mestrado   Doutorado  \newline \textgreater{}          1           3              1} \tn 
\hhline{>{\arrayrulecolor{DarkBackground}}-}
\end{tabularx}
\par\addvspace{1.3em}


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

\end{document}