Não foi possível enviar o arquivo. Será algum problema com as permissões?
Diferenças
Aqui você vê as diferenças entre duas revisões dessa página.
Ambos lados da revisão anterior Revisão anterior Próxima revisão | Revisão anterior Próxima revisão Ambos lados da revisão seguinte | ||
disciplinas:ce223:comandos2008 [2008/03/17 16:51] ehlers |
disciplinas:ce223:comandos2008 [2008/03/19 15:14] ehlers |
||
---|---|---|---|
Linha 341: | Linha 341: | ||
colSums(m1) | colSums(m1) | ||
+ | </code> | ||
- | #operacoes com matrizes | + | Operacoes com matrizes |
+ | <code R> | ||
m4 <- matrix(1:6, nc = 3) | m4 <- matrix(1:6, nc = 3) | ||
m5 <- matrix(10 * (1:6), nc = 3) | m5 <- matrix(10 * (1:6), nc = 3) | ||
Linha 370: | Linha 371: | ||
solve(m6) | solve(m6) | ||
+ | mat <- matrix(c(1, 5, 2, 3, -2, 1, -1, 1, -1), nc = 3) | ||
+ | |||
+ | vec <- c(10, 15, 7) | ||
+ | |||
+ | solve(mat, vec) | ||
</code> | </code> | ||
+ | |||
+ | === 19/03/2008 === | ||
+ | Data frames | ||
+ | <code R> | ||
+ | d1 = data.frame(x=1:10,y=c(51,54,61,67,68,75,77,75,80,82)) | ||
+ | |||
+ | d1 | ||
+ | |||
+ | x y | ||
+ | 1 1 51 | ||
+ | 2 2 54 | ||
+ | 3 3 61 | ||
+ | 4 4 67 | ||
+ | 5 5 68 | ||
+ | 6 6 75 | ||
+ | 7 7 77 | ||
+ | 8 8 75 | ||
+ | 9 9 80 | ||
+ | 10 10 82 | ||
+ | |||
+ | names(d1) | ||
+ | |||
+ | d1$x | ||
+ | d1$y | ||
+ | |||
+ | d1[,1] | ||
+ | d1[,2] | ||
+ | |||
+ | plot(d1) | ||
+ | |||
+ | plot(d1$x,d1$y) | ||
+ | |||
+ | d2 = data.frame(Y = c(rnorm(5,mean=10,sd=2), rnorm(5,16,2), rnorm(5,14,2))) | ||
+ | |||
+ | gl(3, 5) | ||
+ | [1] 1 1 1 1 1 2 2 2 2 2 3 3 3 3 3 | ||
+ | Levels: 1 2 3 | ||
+ | |||
+ | d2$lev = gl(3, 5) | ||
+ | |||
+ | d2 | ||
+ | |||
+ | is.factor(d2$lev) | ||
+ | </code> | ||
+ | |||
+ | Aplicando uma funcao a um Data Frame separando por fatores | ||
+ | <code R> | ||
+ | by(d2$Y, d2$lev, summary) | ||
+ | </code> | ||
+ | |||
+ | Criando um Data Frame a partir de todas as combinacoes de 2 fatores. | ||
+ | <code R> | ||
+ | d3 = expand.grid(1:3, 4:5) | ||
+ | d3 | ||
+ | |||
+ | is.data.frame(d3) | ||
+ | </code> | ||
+ | |||
+ | Adicionando colunas | ||
+ | <code R> | ||
+ | d4 = data.frame(peso=rnorm(15,65,5),altura=rnorm(15,160,10)) | ||
+ | d4 | ||
+ | |||
+ | d4=cbind(d4,sexo=c(rep('M',10),rep('F',5))) | ||
+ | d4 | ||
+ | </code> | ||
+ | |||
+ | Toda coluna que não seja composta exclusivamente de números é definida como um fator. | ||
+ | <code R> | ||
+ | is.factor(d4$sexo) | ||
+ | [1] TRUE | ||
+ | |||
+ | letters | ||
+ | |||
+ | LETTERS | ||
+ | |||
+ | d4=cbind(d4,nome=letters[1:15]) | ||
+ | |||
+ | is.factor(d4$nome) | ||
+ | [1] TRUE | ||
+ | |||
+ | d4$nome= as.character(d4$nome) | ||
+ | |||
+ | d4 | ||
+ | |||
+ | dim(d4) | ||
+ | |||
+ | names(d4) | ||
+ | |||
+ | dimnames(d4) | ||
+ | |||
+ | rownames(d4) | ||
+ | |||
+ | colnames(d4) | ||
+ | |||
+ | d4[d4$sexo=='M',1:2] | ||
+ | |||
+ | d4[d4$sexo=='F',4] | ||
+ | |||
+ | by(d4[,1:2],d4$sexo,function(x)x) | ||
+ | |||
+ | by(d4[,4],d4$sexo,function(x)as.character(x)) | ||
+ | </code> | ||
+ | |||
+ | Listas | ||
+ | <code R> | ||
+ | |||
+ | Listas sao estruturas genericas e flexiveis que permitem armazenar | ||
+ | diversos formatos em um unico objeto. | ||
+ | |||
+ | lis1 <- list(A = 1:10, B = "CE 223", C = matrix(1:9,ncol = 3)) | ||
+ | lis1 | ||
+ | |||
+ | $A | ||
+ | [1] 1 2 3 4 5 6 7 8 9 10 | ||
+ | |||
+ | $B | ||
+ | [1] "CE 223" | ||
+ | | ||
+ | $C | ||
+ | [,1] [,2] [,3] | ||
+ | [1,] 1 4 7 | ||
+ | [2,] 2 5 8 | ||
+ | [3,] 3 6 9 | ||
+ | </code> | ||
+ | |||
+ | Varias funcoes do R retornam listas | ||
+ | <code R> | ||
+ | d1 | ||
+ | |||
+ | lis2 = lm (y ~ x, data=d1) | ||
+ | |||
+ | lis2 | ||
+ | |||
+ | is.list(lis2) | ||
+ | |||
+ | class(lis2) | ||
+ | |||
+ | summary(lis2) | ||
+ | |||
+ | anova(lis2) | ||
+ | |||
+ | names(lis2) | ||
+ | |||
+ | lis2$pred | ||
+ | |||
+ | lis2$residuals | ||
+ | |||
+ | par(mfrow=c(2,2)) | ||
+ | |||
+ | plot(lis2) | ||
+ | </code> | ||
+ | |||
+ | Selecionando elementos de uma lista | ||
+ | <code R> | ||
+ | lis1$A | ||
+ | |||
+ | lis2$coeff | ||
+ | |||
+ | lis1[3] | ||
+ | |||
+ | lis1[[3]] | ||
+ | |||
+ | </code> | ||
+ |