#Basta Mudar o Diretório?
#Qual o comando você usou para mudar o diretório de trabalho?
setwd()
#Este comando bastou para restituir o workspace? Se não, que outro comando é necessário?
#nao bastou, entao eu preciso de chamar no R o file para voltar ao meu workspace.
load(file".rdata")

#Um Comando Perigoso
#Há um comando simples com a função rm que apaga todos os objetos de sua área de trabalho. Qual é?
rm(list())
#Suponha que você tenha digitado este comando. De que maneira poderia evitar a perda definitiva de todos os objetos apagados?
a partir do meu script eu posso fazer os objetos de novo ou 

#Classes de Objetos
#A distribuição básica do R vem com os objetos letters e LETTERS.
#Descubra o que cada um contém.
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"
#Descubra a classe de cada um.
class(letters)
[1] "character"
class(LETTERS)
[1] "character"
#Como você os transformaria em objetos da classe fator?
LETTERS <- factor(LETTERS)
letters <- factor (letters)

#Bemvindo Nota R
carambola <- c("abacaxi", "beterraba")
salada <- c("beringela", "batata")

#Remocao Com Critérios
load(file="bichos.rdata")
ls()
rm(temp1, temp2, temp3)
save(anfibios, aves, mamiferos, file= "bichos01.rdata")

#Objetos de Data
hoje <- Sys.Date()
class(hoje)
copa.70 <- "1970-06-21"
copa.70 <- as.Date(copa.70, fotmat= "1970/06/21")
hoje - copa.70
dif <- (hoje - copa.70)
hoje + 43
outrodia <- (hoje + 43)