Sorteio aleatório de códigos ou nomes

Para randomizar amostras ou mesmo fazer um sorteio, pode se interesse não usar números e sim códigos ou nomes. O primeiro passo é criar um vetor (ou lista) com os nomes que deseja sortear.

Como exemplo, criarei um código para amostras onde T corresponde ao tratamento que receberão e G é o grupo. O código ficará assim: T1G1, que será o tratamento 1 do grupo 1. Irei considerar 3 tipos de tratamento e 4 grupos, totalizando 12 códigos.

O mais trabalhoso é escrever todos os códigos, pois como será um vetor de caracteres cada códio deve aparecer entre aspas. Nessas horas alguma ferramenta ou comando para automatizar seria bom, mas até o momento desconheço.

> # criando a lista de códigos
> amostras <- c("T1G1","T1G2","T1G3","T1G4",
"T2G1","T2G2","T2G3","T2G4",
"T3G1","T3G2","T3G3","T3G4")

Para sortear basta entrar com o comando sample.

> # sorteio
> sample(amostras, 12, replace = FALSE, prob = NULL)

Mudando para o Texmaker

Não sei se é aconteceu com todos que usam o Deepin (ou outra distro Linux), mas do nada o TeXstudio parou e funcionar e nem chega abrir o software, mesmo removendo e instalando novamente não resolveu. Então a solução foi procurar outro editor LaTeX que dê para trabalhar tanto em Linux quanto Windows.

Procurando acabei encontrando o Texmaker. Para instalar tive apenas que abrir a Deepin Store e procurar pelo nome e clicar em instalar. O software é muito parecido com o TeXstuido, é quase idêntico mudando apenas o design, isso facilita bastante seu uso.

Na página oficial do Texmaker tem a opção para Windows e Mac OS também.

Página oficial do Texmaker:
Link: http://www.xm1math.net/texmaker/index.html

Referenciar ou citar o R e pacotes

Ao utilizar o R em trabalhos acadêmicos e científicos precisamos citá-lo nas referências. Também é interessante citar os pacotes utilizados. Para facilitar basta usar o comando citation()

> citation () # referencia software R

> citation(package = "nome_do_pacote") # referencia de um pacote

E tem a vantagem de além de mostrar como referenciar nas publicações, também traz a entrada em LaTeX.

Tabela em paisagem no LaTex

Para fazer criar um ambiente com a folha em paisagem usa-se o package rotating. Depois é só criar o ambiente sidewaystable ou sidewaysfigure.

% preambulo
\usepackage{rotating}

% Caso de uma tabela:
\begin{sidewaystable}
\caption{Titulo da tabela.}
\label{tab:exemplo}
\begin{center}
\begin{tabular}{c c}
\hline
Coluna 1 & ) Coluna 2 \\
\hline
Linha 1 & Linha 1 \\
Linha 2 & Linha 2 \\
\hline
\end{tabular}
\end{center}
{\footnotesize Fonte: Elaborado pelo autor.}
\end{sidewaystable}

Gerar códigos para Análise Sensorial no R

Para gerar os códigos para as amostras da minha análise sensorial estabeleci que o intervalo vai de 100 a 999, pois todos terão três dígitos, em seguida só fiz um sorteio com o comando sample() e depois usei a compara para ver se algum número repetia entre uma amostra e outra. Tudo seguindo o script abaixo.

Não se esqueçam de anotar os códigos gerados em outro documento (documento de texto) pois a cada vez que se roda o script são gerados números diferentes pois é sorteio aleatório. Por isso deve ficar salvo os grupos de códigos para identificar qual é cada amostra depois. Segue os comando abaixo:

### Amostras Analise Sensorial ###

amostra1 <- sample(100:999, 50, replace = FALSE)
amostra2 <- sample(100:999, 50, replace = FALSE)
amostra3 <- sample(100:999, 50, replace = FALSE)

# verificar se sao iguais
all(amostra1 != amostra2) # se TRUE nao tem numeros iguais
all(amostra1 != amostra3) # se TRUE nao tem numeros iguai
all(amostra3 != amostra2) # se TRUE nao tem numeros iguai

# mostra os codigos
amostra1
amostra2
amostra3