################
TUTORIAL 1
EXERCÍCIOS

1.1 Basta Mudar o Diretório?
Faça o tutorial O Código é tudo!. Em seguida saia do R e abra-o novamente, usando a barra de menu (“Iniciar/Programas/R”). Verifique o diretório de trabalho e corrija-o.

1. Qual o comando você usou para mudar o diretório de trabalho?
Primeiramente usei getwd() para ver qual diretório estava. 
Em seguida inseri o comando para abrir o diretório correto: setwd("C:/Users/Loren Belei/Documents/PROCAM/LinguagemR - BIE5782")

2.Este comando bastou para restituir o workspace? Se não, que outro comando é necessário?
Não, também é necessário informar o comando: load("letras.rdata")


1.2 Um Comando Perigoso
1.Há um comando simples com a função rm que apaga todos os objetos de sua área de trabalho. Qual é?
Trata-se do comando: rm (list=ls())

2. Suponha que você tenha digitado este comando. De que maneira pode recuperar todos os objetos apagados, rapidamente?
Poderia recuperar os objetos apagados através do script salvo, excluindo este comando e rodando o script novamente.
Ou ainda, poderia também rodar novamente o comando load("letras.rdata").

1.3 Classes de Objetos
A distribuição básica do R vem com os objetos letters e LETTERS.
1. Descubra o que cada um contém.
Através do comando letters e LETTERS, descobri que letters contem letras minúsculas enquanto LETTERS contém letras maiúsculas::
> letters
 [1] "a" "b" "c" "d" "e" "f" "g" "h" "i" "j" "k" "l" "m" "n" "o" "p" "q" "r" "s"
[20] "t" "u" "v" "w" "x" "y" "z"
> LETTERS
 [1] "A" "B" "C" "D" "E" "F" "G" "H" "I" "J" "K" "L" "M" "N" "O" "P" "Q" "R" "S"
[20] "T" "U" "V" "W" "X" "Y" "Z"

2. Descubra a classe de cada um.
Com os comandos class(letters) e class(LETTERS) descobri que ambos da classe "character":
> class(letters)
[1] "character"
> class(LETTERS)
[1] "character"

3. Como você os transformaria em objetos da classe fator?
Usando os comandos: letters <- factor(letters) e LETTERS <- factor(LETTERS)
##################################

getwd()
setwd("C:/Users/Loren Belei/Documents/PROCAM/LinguagemR - BIE5782")
load("letras.rdata")
letters 
LETTERS
class(letters) 
class(LETTERS)
letters <- factor(letters) 
LETTERS <- factor(LETTERS)