amerhamdan — Nov 14, 2012, 7:33 AM
#----------------------------------------------------#
# Data frames, entrando e importando dados #
# Amer Cavalheiro Hamdan #
# NOVEMBRO/2012 #
#----------------------------------------------------#
#-----------------------------------------------------
# Importando e lendo dados
#--------------------------------------
#usando a funcao scan()
#digite scan() e depois os números 2,5, 10:
numeros<-scan()
2
[1] 2
5
[1] 5
10
[1] 10
numeros
numeric(0)
#---------------------------------
#Exercicio: utilizando a funcao scan() crie um objeto chamado QI
# e digite 10 valores
#---------------------------------
#Entrando com dados já digitados
#---------------------------------
#Exemplo:dadosdemog.txt (em anexo)
#Usar a funçao read.table( )
#funcao read.table("endereco_do_arquivo/dadosdemog.txt", header=TRUE, sep="\t")
dados<-read.table("/Volumes/AMER/AMER1/R/dadosdemog.txt", header=TRUE, sep="\t")
# ou ("F:/pasta/pasta/arquivo.txt, header=T, sep="\t")
dados
sexo idade escola
1 1 18 3
2 1 40 3
3 2 26 3
4 1 21 3
5 1 23 3
6 2 47 4
7 1 27 3
8 2 32 2
9 1 19 3
10 2 20 3
11 2 25 3
12 2 19 3
13 1 23 4
14 2 34 4
15 2 20 3
16 1 20 3
17 2 15 1
18 1 21 3
19 1 23 4
20 1 21 3
21 1 17 1
22 1 20 3
23 1 23 3
24 1 23 4
25 1 20 3
26 2 23 4
27 1 21 3
28 2 18 3
29 1 24 4
30 1 20 3
31 2 20 3
32 2 21 3
33 1 22 3
34 2 21 3
35 1 23 4
36 2 20 3
37 2 47 4
38 1 27 3
39 1 31 2
40 1 24 4
41 1 21 3
42 2 20 3
43 2 22 3
44 1 22 3
45 1 20 3
46 2 20 3
47 1 23 4
48 1 24 3
49 1 20 3
50 2 18 3
51 1 22 2
52 1 25 3
53 1 23 3
54 1 23 3
55 2 19 3
56 2 19 3
57 1 32 3
58 1 24 4
59 2 19 3
60 2 36 2
61 1 18 3
62 1 23 4
63 1 18 3
64 1 23 1
65 1 18 3
66 2 30 4
67 1 21 4
68 1 20 3
69 2 19 3
names(dados)# nomes das variaveis
[1] "sexo" "idade" "escola"
str(dados)# apresenta informacoes sobre o objeto
'data.frame': 69 obs. of 3 variables:
$ sexo : int 1 1 2 1 1 2 1 2 1 2 ...
$ idade : int 18 40 26 21 23 47 27 32 19 20 ...
$ escola: int 3 3 3 3 3 4 3 2 3 3 ...
length(dados$idade)# lista o numero de observacoes da variavel
[1] 69
attach(dados)# para anexar o dados e analisar as variaveis individualmente
length(escola)
[1] 69
#-----------------------------------------------
#Exercicio: crie no excel um arquivo com três variaveis e salve com a extensão ".txt", com o nome:"andre.txt"
#-------------------------------------------------
# Importando dados diretamente do Excel
#-----------------------------------------------#
#Exemplo: digite tabela do excel:
#X1 X2
#5 30
#10 40
#15 50
#60 60
#use: "crtl c",
#digite:
#dados.excel<-read.table("clipboard", header=TRUE, sep="", na.strings="NA", dec=".")
#dados.excel
#is.data.frame(dados.excel)
#----------------------------
#Voce pode importar dados em outros formatos:spss, stata, etc.utilizando o pacote foreign
#install.packages("foreign")
#library(foreign)
#meusdados <- read.spss("c:/arquivo.sav")
#---------------------------------------