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 | ||
|
cursos:mct:exemplo5 [2011/05/09 10:42] paulojus |
cursos:mct:exemplo5 [2011/05/09 10:59] paulojus |
||
|---|---|---|---|
| Linha 1: | Linha 1: | ||
| ====== Miscelânia de tópicos ====== | ====== Miscelânia de tópicos ====== | ||
| - | |||
| - | <fs medium>Um breve exemplo de operações matriciais - coeficientes de regressao(modelo) linear | ||
| - | </fs><code R> | ||
| - | require(MASS) | ||
| - | data(hills) | ||
| - | names(hills) | ||
| - | X <- cbind(1, hills$dist) | ||
| - | y <- hills$time | ||
| - | |||
| - | ## Há formas e formas de fazer operações... | ||
| - | |||
| - | ## uma forma não muito adequada: | ||
| - | solve(t(X) %*% X) %*% t(X) %*% y | ||
| - | |||
| - | ## outra melhor: | ||
| - | solve(crossprod(X), crossprod(X, y)) | ||
| - | </code> | ||
| - | |||
| <fs medium>Representação e Manipulação de datas</fs> | <fs medium>Representação e Manipulação de datas</fs> | ||
| Linha 72: | Linha 54: | ||
| z | z | ||
| </code> | </code> | ||
| - | |||
| - | <fs medium>Lendo dados de teclado e da área de transferência</fs> | ||
| - | <code R> | ||
| - | ## digitar dados com <ENTER> após cada registro. Digitar um <ENTER> a mais para encerrar. | ||
| - | s1 <- scan() | ||
| - | |||
| - | ## recortar (CTRL-C) os seguintes | ||
| - | 12 13 14 | ||
| - | 21 21 14 | ||
| - | 12 31 25 | ||
| - | 15 32 29 | ||
| - | |||
| - | ## lendo como vetor... | ||
| - | s1 <- scan("clipboard") | ||
| - | ## .. e transformando para matriz | ||
| - | ## le por linhas, portanto para montar matriz de ser por linha | ||
| - | matrix(s1, nc=3, byrow=T) | ||
| - | |||
| - | ## agora lendo diretamente como data-frame | ||
| - | d1 <- read.table("clipboard") | ||
| - | d1 | ||
| - | |||
| - | ## mais opcoes | ||
| - | ## recortar (CTRL-C) os seguintes | ||
| - | X; Y; Z; S | ||
| - | 12,3; 13; 14,2; A | ||
| - | 21,2; 21; 14,0; A | ||
| - | 12,1; 31; 25,1; B | ||
| - | 15,1; 32; 29,9; B | ||
| - | |||
| - | d2 <- read.table("clipboard", sep=";", dec=",", header=T) | ||
| - | d2 | ||
| - | </code> | ||
| - | |||
| - | <fs medium>Exemplo lendo tabelas da página do MCT/Indicadores</fs> | ||
| - | |||
| - | Acessar tabelas na web por www.mct.gov.br/indicadores | ||
| - | |||
| - | <code R> | ||
| - | |||
| - | |||
| - | </code> | ||
| - | |||
