MAE5898 - Estatıstica para dadossuperdimensionados

Prof. Florencia Leonardi

Aula 3

2 de Marco, 2016

> library("glmnet")

> data <- read.table("crime.txt")

> data2 <- data.matrix(data)

> model <- glmnet(data2[,1:6],data2[,7])

> plot(model)

0.0 0.2 0.4 0.6

0.00

0.10

0.20

0.30

L1 Norm

Coefficients

0 2 3 5