search for: 05_seguridad_ciudadana

...1849] 1 1 1 1 1 1 1 1 1 1 ... .. ..$ v : num [1:1849] 1 1 1 1 1 1 1 1 1 1 ... .. ..$ nrow : int 1849 .. ..$ ncol : int 1 .. ..$ dimnames:List of 2 .. .. ..$ Terms: [1:1849] "071004" "100000" "101005" "1022" ... .. .. ..$ Docs : "05_seguridad_ciudadana.txt" .. ..- attr(*, "class")= [1:2] "TermDocumentMatrix" "simple_triplet_matrix" .. ..- attr(*, "weighting")= [1:2] "term frequency" "tf" > >m<-as.matrix(tdm) ######## Al probar str(tdm), se obtiene lo siguiente: Lis...

...um [1:1849] 1 1 1 1 1 1 1 1 1 1 ... > > .. ..$ nrow : int 1849 > > .. ..$ ncol : int 1 > > .. ..$ dimnames:List of 2 > > .. .. ..$ Terms: [1:1849] "071004" "100000" "101005" "1022" ... > > .. .. ..$ Docs : "05_seguridad_ciudadana.txt" > > .. ..- attr(*, "class")= [1:2] "TermDocumentMatrix" > "simple_triplet_matrix" > > .. ..- attr(*, "weighting")= [1:2] "term frequency" "tf" > >> > >>m<-as.matrix(tdm) > > > &g...

...comparación de dos archivos de una misma organización para encontrar las diferencias entre su informe del tema edl año 2005 y el del año 2013: Todos los comandos van bien, a exepción del último "colnames", como se ve en la siguiente secuencia: > pdf1<-"./PLAN de INSPECCIONES/05_seguridad_ciudadana.pdf" > pdf2<-"./PLAN de INSPECCIONES/2013_21SeguridadCiudadana.pdf" > exe<-"./xpdfbin-win-3.04/xpdfbin-win-3.04/bin32/pdftotext.exe" > system(paste("\"", exe, "\" \"", pdf1, "\"", sep = ""), wait = F...

...mo coloqué de referencia, y acá más >> abajo reproduzco el código: >> Versión de R: 3.1.1 >> >> >> #### >> require(tm) >> require(wordcloud) >> require(Rcpp) >> require(slam) >>> info.05<-readLines("./PLANIFICACION/Informes/2005/05_seguridad_ciudadana.txt", encoding="UTF-8") >>> info.13<-readLines("./PLANIFICACION/Informes/2013/2013_21SeguridadCiudadana.txt", encoding="UTF-8") >>> info.05<-iconv(enc2utf8(info.05), sub="byte") >>> info.13<-iconv(enc2utf8(info.13), su...