2013-03-07 11 views
15

Sembra molto banale ma non riesco a leggere in jpeg, o qualsiasi tipo di immagine in R 2.15. In R 2.10 potrei farlo usando la libreria rimage o la libreria ReadImage - con read.jpeg per esempio - ma sembra che non ci sia modo di farlo in R 2.15 e versioni successive. Qualche idea su questo?come read.jpeg in R 2.15

library('ReadImages') 
Error in library("ReadImages") : there is no package called ‘ReadImages’ > 
install.packages('ReadImages') Installing package(s) into ‘C:/Program Files/R/R-2.15.1/library’ (as ‘lib’ is unspecified) 

Warning in install.packages : package ‘ReadImages’ is not available (for R version 2.15.1) 
+0

postale po 'di codice. cioè quello che hai provato a fare e il messaggio di errore che hai ricevuto. Il 'packageVersion (nomepacchetto)' e 'sessionInfo()' non farebbero male a –

+1

sembra che 'rimage' e' ReadImage' siano orfani, ma ... 'library (" sos "); findFn ("{read jpeg}") 'trova anche funzioni rilevanti nei pacchetti' biOps' e 'jpeg'. Hai provato quelli? –

+0

> library ('ReadImages') Errore nella libreria ("ReadImages"): non esiste alcun pacchetto chiamato "ReadImages" > install.packages ("ReadImages") Installazione dei pacchetti in "C:/Programmi/R/R-2.15.1/library ' (come' lib 'non è specificato) Avvertenza nei pacchetti install.: pacchetto' ReadImages 'non è disponibile (per R versione 2.15.1) – office206

risposta

31

Come indicato nei commenti, provare il pacchetto jpeg.

install.packages("jpeg") ## if necessary 

library(jpeg) 
## get help 
library(help = jpeg) 
## get more help 
?readJPEG 

esempio, dal aiuto:

# read a sample file (R logo) 
img <- readJPEG(system.file("img", "Rlogo.jpg", package="jpeg")) 

Un'altra opzione è rgdal, che può leggere da una massiccia Bestiario di formati. Il tracciamento e la manipolazione sono gestiti in modo diverso.

install.packages("rgdal") ## if necessary 
library(rgdal) 
img <- readGDAL(file.path(R.home(), "doc", "html", "logo.jpg")) 

C'è anche il pacchetto readbitmap su CRAN, vale sempre la pena una ricerca di base della lista dei pacchetti per quello che stai cercando.

6

anche:

## if not already installed 
install.packages("jpeg") 

library(jpeg) 

?readJPEG() 

img <- readJPEG("/Users/name/locationInFileDirectory/image.jpg", native = TRUE) 

#this will display your image to test you read it correctly 
if(exists("rasterImage")){ 
     plot(1:2, type='n') 
     rasterImage(img,1,1,2,2) 
}