Buenas dias a tod@s,
Quisiera saber si alguien tiene experiencia con el procesamiento de imágenes
(en formatos JPEG o PNG) en R y la búsqueda de similitudes / diferencias
entre ellas.
La idea de lo que me gustaría hacer es: tomar una imagen, cargarla en R y
luego analizar su estructura. Para las dos primeras tareas, la
libreria ReadImages en CRAN me ha sido útil, pero para la segunda, hasta
ahora no he encontrado ninguna aplicación. Este es un ejemplo tomado de la
libreria que menciono:
# install.packages("ReadImages")
require(ReadImages)
data(logo)
par(mfrow = c(1,2) )
plot(logo, main = ''R-logo, formato original'')
plot(logo^2, main = ''R-logo modificado'')
El gráfico resultante corresponde a dos logos de R, uno en el formato
original y otro, una "leve" modificación. Para este caso particular,
me
gustaria poder determinar cuáles son las similitudes / diferencias de ambas
imágenes. Existe alguna manera de hacerlo? Si no es via R, podria alguien
sugerirme alguna fuente de información?
Muchas gracias,
Jorge Ivan Velez
[[alternative HTML version deleted]]
Hola, ¿qué tal? Mira a ver si te vale esto: http://romainfrancois.blog.free.fr/index.php?post/2009/06/22/using-ImageJ-from-R%3A-the-RImageJ-package En puridad, no es R, pero... Un saludo, Carlos J. Gil Bellosta http://www.datanalytics.com El 8 de julio de 2009 17:46, Jorge Ivan Velez<jorgeivanvelez en gmail.com> escribió:> Buenas dias a tod en s, > Quisiera saber si alguien tiene experiencia con el procesamiento de imágenes > (en formatos JPEG o PNG) en R y la búsqueda de similitudes / diferencias > entre ellas. > > La idea de lo que me gustaría hacer es: tomar una imagen, cargarla en R y > luego analizar su estructura. Para las dos primeras tareas, la > libreria ReadImages en CRAN me ha sido útil, pero para la segunda, hasta > ahora no he encontrado ninguna aplicación. Este es un ejemplo tomado de la > libreria que menciono: > > # install.packages("ReadImages") > require(ReadImages) > data(logo) > par(mfrow = c(1,2) ) > plot(logo, main = 'R-logo, formato original') > plot(logo^2, main = 'R-logo modificado') > > El gráfico resultante corresponde a dos logos de R, uno en el formato > original y otro, una "leve" modificación. Para este caso particular, me > gustaria poder determinar cuáles son las similitudes / diferencias de ambas > imágenes. Existe alguna manera de hacerlo? Si no es via R, podria alguien > sugerirme alguna fuente de información? > > Muchas gracias, > > Jorge Ivan Velez > > [[alternative HTML version deleted]] > > > _______________________________________________ > R-help-es mailing list > R-help-es en r-project.org > https://stat.ethz.ch/mailman/listinfo/r-help-es > >
Hola Jorge, te aconsejo el uso del package biOps y concretamente de la función imgDifferenceEdgeDetection(). Esta función permite detectar los contornos en una imagen, lo cual debería serte útil a la hora de comparar dos imagenes en color. El código correspondiente a tu ejemplo sería: require(biOps) data(logo) logo2=logo^2/255 y <- imgDifferenceEdgeDetection(logo, bias=1) y2<-imgDifferenceEdgeDetection(logo2, bias=1) z=imgDiffer(y,y2) #imagen correspondiente a la diferencia de las dos imagenes y e y2 plot(z) -- ____________________________________ Olivier G. Nuñez Email: onunez en iberstat.es Tel : +34 663 03 69 09 Web: http://www.iberstat.es ____________________________________ El 08/07/2009, a las 17:46, Jorge Ivan Velez escribió:> par(mfrow = c(1,2) ) > plot(logo, main = 'R-logo, formato original') > plot(logo^2, main = 'R-logo modificado')
Hola de nuevo, Sólo una actualización a mi mensaje anterior: descargué libtiff y libjpeg como se sugiere en [1], pero aun así obtengo el mismo error. Gracias por su tiempo. Jorge [1] http://cran.r-project.org/web/packages/biOps/index.html <http://cran.r-project.org/web/packages/biOps/index.html> 2009/7/8 Jorge Ivan Velez <>> > Muchas gracias a Kenneth Cabrera, Carlos Gil Bellosta y Olivier Nuñez por > sus respuestas. > Una de las opciones mencionadas es utilizar la librería biOps. Por alguna > razón, cuando la instalo via install.packages() y luego la cargo via > requiere(), obtengo lo siguiente en la consola: > > require(biOps) > Loading required package: biOps > Error in inDL(x, as.logical(local), as.logical(now), ...) : > unable to load shared library > ''C:/PROGRA~1/R/R-29~1.1PA/library/biOps/libs/biOps.dll'': > LoadLibrary failure: The specified module could not be found. > > y el error adjunto (archivo PDF) como resultado. Reinstalo la libreria tal > y como sugiere el mensaje pero este procedimiento no funciona en lo absoluto > pues sigo obteniendo el mismo error una y otra vez. > > Cualquier sugerencia acerca de cómo resolver este problema es altamente > agradecida. > > Estoy usando R 2.9.1-Patched en XP. Esta es mi sessionInfo(): > > R version 2.9.1 Patched (2009-06-28 r48859) > i386-pc-mingw32 > > locale: > LC_COLLATE=English_United States.1252;LC_CTYPE=English_United > States.1252;LC_MONETARY=English_United > States.1252;LC_NUMERIC=C;LC_TIME=English_United States.1252 > > attached base packages: > [1] stats graphics grDevices utils datasets methods base > > loaded via a namespace (and not attached): > [1] tools_2.9.0 > > Gracias por su tiempo, > > Jorge >[[alternative HTML version deleted]]
¿Te ayuda esto? http://tolstoy.newcastle.edu.au/R/e6/help/09/06/18013.html Un saludo, Carlos J. Gil Bellosta http://www.datanalytics.com
Hola Carlos, Parcialmente. Utilicé parte del asunto de ese mensaje y encontré este post de R-help: http://tolstoy.newcastle.edu.au/R/e3/help/07/12/6166.html <http://tolstoy.newcastle.edu.au/R/e3/help/07/12/6166.html>Descargué (de nuevo) las librerias sugeridas en formato .exe y sus "sources" en zip. Al descomprimirlas encontré los archivos .dll que necesitaba. Luego los almacené en C:\Program Files\R\R-2.9.1pat\library\biOps\libs tal y como el mensaje de error anunciaba y funcionó! Gracias a todos, Jorge 2009/7/8 Carlos J. Gil Bellosta <cgb@datanalytics.com>> ¿Te ayuda esto? > > http://tolstoy.newcastle.edu.au/R/e6/help/09/06/18013.html > > Un saludo, > > Carlos J. Gil Bellosta > http://www.datanalytics.com >[[alternative HTML version deleted]]