####1.1####
####Usei o comando:#### 

setwd(). 

#### Dentro do parenteses escrevi o o caminho que levava a pasta do diretório de trabalho.
#### Não! Ainda é necessário verificar se o workspace está vazio com o comando ls().   

####1.2######
####Deve-se utilizar a função rm e listar todos os objetos que foram criados e que desejam ser excluídos.

rm("temp1", "temp2", "temp3")

###ou

rm(list=ls(pattern="temp")

ls()

#########1.3########
###Letters: apresenta as letras do alfabeto em minúsculo
###[1] "a" "b" "c" "d" "e" "f" "g" "h" "i" "j" "k" "l" "m" "n" "o" "p" "q" "r" "s" "t"
###[21] "u" "v" "w" "x" "y" "z"
###LETTERS: apresenta as letras do alfabeto em maiúsculo.
###[1] "A" "B" "C" "D" "E" "F" "G" "H" "I" "J" "K" "L" "M" "N" "O" "P" "Q" "R" "S" "T"
###[21] "U" "V" "W" "X" "Y" "Z"
####A classe que cada um contém são:

class(letters)

###[1] "character"
###Para transformar os objetos em classes de fatores:

letters.1<-factor(letters)
letters.1
a b c d e f g h i j k l m n o p q r s t u v w x y z 
1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 

LETTERS.1<-factor(LETTERS)
LETTERS.1
 [1] A B C D E F G H I J K L M N O P Q R S T U V W X Y Z
Levels: A B C D E F G H I J K L M N O P Q R S T U V W X Y Z


##############1.4#########

carambola<-c("abacaxi","beterraba")
salada<-c("berinjela","babata")
rm(salada)
salada<-C"berinjela,"batata"
salada<-c("berinjela","batata")


###########1.5############

load("bichos.rdata")
rm("temp1", "temp2", "temp3")
save(list=ls(), file="bichos01.rdata")



#############1.6############
Sys.Date
hoje<-Sys.Date()
class(hoje)
copa.70<-"21/06/70"
copa.70<-as.Date(copa.70, format="%d/%m/%y")
dif<-c(hoje-copa.70)
outrodia<-(hoje+43)
outrodia