ABusheadorsh
Culiad@
- Registrado
- 2018/04/27
- Mensajes
- 3.327
- Sexo
en una de esas tenemos suerte y la prostituta mórbida se contagia y caga, por presentarse a la zona 0.
, tomando datos de la Casen 2017, la mediana del ingreso de la actividad principal es $350.000 y el ingreso promedio es $516.891.
rstudio.com
###############################################################################
#Deciles de ingreso de la actividad principal y la media de cada decil
#Datos Casen 2017
###############################################################################
#Dependencias
if (!require('haven')) install.packages('haven'); library('haven')
if (!require('Hmisc')) install.packages('Hmisc'); library('Hmisc')
if (!require('ggplot2')) install.packages('ggplot2'); library('ggplot2')
#Carga de datos
casen_folder <- file.path(getwd(), "Cornelious")
dir.create(casen_folder)
setwd(casen_folder)
casen_url <- "http://observatorio.ministeriodesarrollosocial.gob.cl/casen-multidimensional/casen/docs/Casen_2017_stata.dta.zip"
casen_dest <- "Casen2017.zip"
download.file(casen_url, casen_dest)
unzip(casen_dest)
casen_path <- "Casen 2017.dta"
cas17 <- read_dta(casen_path)
#Eres linda Sailor!
#Calcula deciles y weighted.mean de cada decil, a mano!
cas17ss <- cas17[!is.na(cas17$yoprcor) , c("yoprcor", "expr")]
c17s <- cas17ss[order(cas17ss$yoprcor),]
c17s$sumProd <- c17s$yoprcor*c17s$expr
c17s$exprCosum <- cumsum(c17s$expr)
c17s$sumProdCosum <- cumsum(c17s$sumProd)
totExpr <- sum(c17s$expr)
stepExpr <- totExpr / 10
deciles <- data.frame(decil = numeric(),
indi = numeric(),
expr = numeric(),
sumProd = numeric(),
salStart = numeric(),
salEnd = numeric())
prevIndi <- 1
salStart <- c17s$yoprcor[1]
sumProdPercAgreAnterior <- 0
for (i in 1:10) {
exprPerc <- stepExpr * i
indi <- findInterval(exprPerc, c17s$exprCosum)
sumProdPercCosum <- c17s$sumProdCosum[indi]
if (i < 10)
{
factor <- (exprPerc-c17s$exprCosum[indi])/(c17s$exprCosum[indi+1]-c17s$exprCosum[indi])
sumProdPerc <- sumProdPercCosum + factor * c17s$sumProd[indi+1] - sumProdPercAgreAnterior
}
else
{
sumProdPerc <- sumProdPercCosum - sumProdPercAgreAnterior
}
salEnd <- c17s$yoprcor[indi]
deciles[nrow(deciles) + 1, ] <- c(i, indi, exprPerc, sumProdPerc, salStart, salEnd)
prevIndi <- indi + 1
sumProdPercAgreAnterior <- sumProdPercCosum + factor * c17s$sumProd[indi+1]
salStart <- salEnd
}
deciles$media <- deciles$sumProd/stepExpr
options(scipen = 999)
# Media
weighted.mean(cas17$yoprcor, cas17$expr, na.rm=TRUE)
#Deciles
deciles[,c(1,5,6,7)]
#Deciles segun r
#wtd.quantile(c17s$yoprcor, p = seq(0, 1, length = 11), na.rm = TRUE, weight=c17s$expr, type = "i/n")
#Grafica la media de los deciles
p <- ggplot(deciles, aes(x=decil, y=media)) + geom_bar(stat="identity")
p
#Bubalon es un buen antroniano
# Clean up, elimina folder Cornelious
setwd("..")
unlink(casen_folder, recursive = TRUE)
Así que el shaa no sabia que hay gente tan pobre y hacinada en chile y por eso sus proyecciones eran erróneas???
Jajajajaja, no si estos weones no viven en una burbuja, weon
Al final lo unico bueno de las ultimas 100 paginas ha sido el cuento que tiro el Dexter
Ya que nos hemos dedicado a puro pelear desde ya hace un buen rato... aunque de todas formas las cartas estan echadas y nos nos queda mas que cuidarnos, porque la informacion, la forma de este virus re ql puede cambiar en cualquier momento
La historia del otro wn para enmarla si
Justo tiene 2 hijas asmaticas, se le enferman
Caen en el hospital 1 se muere, el wn viene devastado a postear a un puto foro que se le murio una hija ( quien haria una wea asi se le muere un hijo?)
Luego justo aparece una weona que ohh chucha es la hermana del cipadrito y justo postea aca en el foro tambien
Llega como weona loca a contar toda las historias que estan pasandole, entre ellas que su hermano se pesco a combos con los pacos, los milicos, la pdi, la interpol, la cia y scotland yard... hasta ahi aun crei que la historia podia ser real
Pero no contabamos con que se le iba a morir la otra hija po wn... aqui yo dije ya vayanse a la chucha, debe ser el unico wn en el mundo que se le mueren 2 hijos menores de edad (asumo) por covid, mas cuatico aun la hermana postea en el mismo foro (mundo culiao chico y raro no? Tambien cuantos cipadritos tienen a la hermana con cuenta aqui justo)
Pasan los dias y no hay noticias de que 2 niñas mas aun ¡HERMANAS! murieron por covid, no saldria eso hasta en los diarios de china?, si por weas muuucho mas chicas han creado los tremendos titulares
Da para lo menos dudar no?
No niego en este foro hay varios weones mas inteligentes que la chucha, pero tambien veo que hay weones mas cagados de la piña que la mierda, que llegan a crear este tipo de weas
Ni yo con mis clones perro de la vale gut y yogurt griego me atrevi a tanto:ph34r-61:
Ahora si es verdad lo del cipa, hasta personalmente le daria las mas sinceras disculpas
el legado
comunas que se llenaron de sonrisas multicolores
las patitas pa hablar de tongosAl final lo unico bueno de las ultimas 100 paginas ha sido el cuento que tiro el Dexter
Ya que nos hemos dedicado a puro pelear desde ya hace un buen rato... aunque de todas formas las cartas estan echadas y nos nos queda mas que cuidarnos, porque la informacion, la forma de este virus re ql puede cambiar en cualquier momento
La historia del otro wn para enmarla si
Justo tiene 2 hijas asmaticas, se le enferman
Caen en el hospital 1 se muere, el wn viene devastado a postear a un puto foro que se le murio una hija ( quien haria una wea asi se le muere un hijo?)
Luego justo aparece una weona que ohh chucha es la hermana del cipadrito y justo postea aca en el foro tambien
Llega como weona loca a contar toda las historias que estan pasandole, entre ellas que su hermano se pesco a combos con los pacos, los milicos, la pdi, la interpol, la cia y scotland yard... hasta ahi aun crei que la historia podia ser real
Pero no contabamos con que se le iba a morir la otra hija po wn... aqui yo dije ya vayanse a la chucha, debe ser el unico wn en el mundo que se le mueren 2 hijos menores de edad (asumo) por covid, mas cuatico aun la hermana postea en el mismo foro (mundo culiao chico y raro no? Tambien cuantos cipadritos tienen a la hermana con cuenta aqui justo)
Pasan los dias y no hay noticias de que 2 niñas mas aun ¡HERMANAS! murieron por covid, no saldria eso hasta en los diarios de china?, si por weas muuucho mas chicas han creado los tremendos titulares
Da para lo menos dudar no?
No niego en este foro hay varios weones mas inteligentes que la chucha, pero tambien veo que hay weones mas cagados de la piña que la mierda, que llegan a crear este tipo de weas
Ni yo con mis clones perro de la vale gut y yogurt griego me atrevi a tanto:ph34r-61:
Ahora si es verdad lo del cipa, hasta personalmente le daria las mas sinceras disculpas
En el tiempo que estuve exiliado, solo y errante por el desierto, el recuerdo de una persona me mantuvo con esperanzas: @Sailor Chemical
Asi que hice un curso de R por internet para impresionarla y demostrarle que no soy un degenerado psicópata que esta obsesionado con ella.
De acuerdo a mi script R
textualmente:
"¿Cuál es la contagiosidad? En un sector de santiago es esta y en otro sector de santiago, que es nuestro drama de la cuarentena en este momento, en otro sector de Santiago, donde hay un nivel de pobreza y hacinamiento, perdón que lo diga con esta… del cual yo no tenía conciencia de la magnitud que tenía”, indicó.
habla de la magnitud y no de que no existía. Claramente hay frases sacadas de contexto de manera bastante miserable por ese pasquin zurdo “piensaprensa”donde dicen:
Mañalich: "Yo no tenia conciencia de la pobreza y hacinamiento (...) no tengo estadísticas sociales..."
Y mas encima mañalich despues dice:
“Uno visita lugares, pero cuando uno entra ahora, después de no haber ido en dos años a un lugar en cualquier comuna y dice, ‘aquí vivían 10 personas en esta casa y ahora están viviendo cien personas’”, agregó.
No se limiten a leer el titular por que es bastante engañoso por decirlo menos
2:
un respaldo para la posteridadAl final lo unico bueno de las ultimas 100 paginas ha sido el cuento que tiro el Dexter
Ya que nos hemos dedicado a puro pelear desde ya hace un buen rato... aunque de todas formas las cartas estan echadas y nos nos queda mas que cuidarnos, porque la informacion, la forma de este virus re ql puede cambiar en cualquier momento
La historia del otro wn para enmarla si
Justo tiene 2 hijas asmaticas, se le enferman
Caen en el hospital 1 se muere, el wn viene devastado a postear a un puto foro que se le murio una hija ( quien haria una wea asi se le muere un hijo?)
Luego justo aparece una weona que ohh chucha es la hermana del cipadrito y justo postea aca en el foro tambien
Llega como weona loca a contar toda las historias que estan pasandole, entre ellas que su hermano se pesco a combos con los pacos, los milicos, la pdi, la interpol, la cia y scotland yard... hasta ahi aun crei que la historia podia ser real
Pero no contabamos con que se le iba a morir la otra hija po wn... aqui yo dije ya vayanse a la chucha, debe ser el unico wn en el mundo que se le mueren 2 hijos menores de edad (asumo) por covid, mas cuatico aun la hermana postea en el mismo foro (mundo culiao chico y raro no? Tambien cuantos cipadritos tienen a la hermana con cuenta aqui justo)
Pasan los dias y no hay noticias de que 2 niñas mas aun ¡HERMANAS! murieron por covid, no saldria eso hasta en los diarios de china?, si por weas muuucho mas chicas han creado los tremendos titulares
Da para lo menos dudar no?
No niego en este foro hay varios weones mas inteligentes que la chucha, pero tambien veo que hay weones mas cagados de la piña que la mierda, que llegan a crear este tipo de weas
Ni yo con mis clones perro de la vale gut y yogurt griego me atrevi a tanto:ph34r-61:
Ahora si es verdad lo del cipa, hasta personalmente le daria las mas sinceras disculpas
Lo increible es que un tipo chanta arrienda una casa vieja, si la casa tiene 2 pisos el con materiales rascas( vulcanita, cholguan) hace 2 e incluso 3 pisos extra y asi la casa de tener 2 pisos paso a tener de 4 a 6 pisos donde meter a como 40 negros por piso cobrandoles por arriendo de cama como 70 lucas( solo multipliquen 80 x 70000 y veran la ganancia de ese chileno vio que arrendaba esa casucha vieja destruida por 800000 ). Es logico que ningun chileno normal pudiera saber eso( eso solo lo sabian los vecinos de esa casa vieja que vivian al lado de esa wea viendo como entraban 80 negros por dia y Canal 13 que hizo un reportaje sobre eso hace como 2 años atras)
Y ojo que ningún cornershop ocupa guantes.
Van a quedar tan vulnerables a psicopatas lenenistas que les encandile la ñata, argentinos weones. A la vuelta de la esquina se ve una balcanizacion de ñatalandia si no mueven la raja y toman menos mate revoloteando la lengua.2:
Pero si Argentina entró en default a las 2 semanas de decretar cuarentena, que economía van a salvar.. ahora se les viene feo, la gente sin plata, encerrados, va a empezar a quedar la caga.. sobre todo ahora que empezaron a subir los contagios.
El escenario será dantesco..
Enviado desde mi moto g(6) mediante Tapatalk
