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:ce071-2014-01 [2014/04/17 11:34] walmes |
disciplinas:ce071-2014-01 [2014/04/23 19:00] walmes |
||
|---|---|---|---|
| Linha 227: | Linha 227: | ||
| ##----------------------------------------------------------------------------- | ##----------------------------------------------------------------------------- | ||
| - | ## Dados de gasto com alimentação (foodcons) em função da receita da | ||
| - | ## família (income) e do número de membros (size). | ||
| - | ## | ||
| - | ## Ajuste um modelo com foodcons~income+size. Faça uma análise | ||
| - | ## completa do modelo e verifique se há necessidade de modificações. Se | ||
| - | ## sim, proceda e justifique. | ||
| da <- | da <- | ||
| - | read.table("http://www.leg.ufpr.br/~walmes/data/business_economics_dataset/EXERCISE/DCFOOD.DAT") | + | read.table("http://www.leg.ufpr.br/~walmes/data/MontgomeryASPE5th/Example12.14.txt", |
| - | names(da) <- c("house","foodcons","income","size") | + | header=TRUE, sep="\t") |
| + | names(da) <- tolower(names(da)) | ||
| str(da) | str(da) | ||
| ##----------------------------------------------------------------------------- | ##----------------------------------------------------------------------------- | ||
| - | ## Engenheiros mediram o comprimento (length, cm) e o peso (weight, g) e | ||
| - | ## o nível de DDT (ddt, ppm) para 144 peixes capturados. Além do mais, a | ||
| - | ## distância de captura rio acima (mile), o rio (river) e a espécie do | ||
| - | ## peixe (species) também foram registrados. | ||
| - | ## | ||
| - | ## Ajuste um modelo com ddt~mile+length+weight. Faça uma análise | ||
| - | ## completa do modelo e verifique se há necessidade de modificações. Se | ||
| - | ## sim, proceda e justifique. | ||
| db <- | db <- | ||
| - | read.table("http://www.leg.ufpr.br/~walmes/data/business_economics_dataset/EXERCISE/DDT.DAT") | + | read.table("http://www.leg.ufpr.br/~walmes/data/business_economics_dataset/EXAMPLES/EXECSAL.DAT") |
| - | names(db) <- c("river","mile","species","length","weight","ddt") | + | |
| - | str(db) | + | head(db) |
| + | |||
| + | ## V1 : int, line | ||
| + | ## V2 : num, salary | ||
| + | ## V3 : int, experience (years) | ||
| + | ## V4 : int, education (years) | ||
| + | ## V5 : int, bonus eligibility (0=no, 1=yes) | ||
| + | ## V6 : int, number of employees supervised | ||
| + | ## V7 : int, corporate assets | ||
| + | ## V8 : int, board member (0=no, 1=yes) | ||
| + | ## V9 : int, age | ||
| + | ## V10: int, campany profits | ||
| + | ## V11: int, international resposability (0=no, 1=yes) | ||
| + | ## V12: int, company's total sales | ||
| ##----------------------------------------------------------------------------- | ##----------------------------------------------------------------------------- | ||
