2011-12-19 17 views
35

bu konuya ben Ar görüntü işleme yapmadım ama belki sahip diğer kişilerin paylaşmak istiyorum How do I find Waldo with Mathematica?R ile Waldo nasıl bulunur?

...

sayesinde esinlenerek!

+2

'EBImage' paketi, Mathematica yanıtında kullanılan işlevlerden en azından bazılarının karşılıklarını içerir. http://www.bioconductor.org/packages/release/bioc/html/EBImage.html –

+2

'adimpro' da yararlı olabilir. http://cran.r-project.org/web/packages/adimpro/index.html –

+3

Burada iki şey var. İlk olarak, hangi görüntü işleme algoritmalarını kullanmak istiyorsunuz? Önceki yorumcular bazı önerdi; Sobel ve Hough'ın yazdıklarını kolaylıkla, vb. Dönüştürebilirim. Diğer soru, hangi format görüntü ile oynuyorsunuz? FITS ve TIFF'ler güzel "raw" piksel verilerine sahipken, diğer formatlar daha karışık olabilir. Ayrıca, imageJ'i daha iyi kullanmak (NIH'den ücretsiz) –

cevap

12

İşte bir başlangıçtır, raster paketini kullanarak. Sorunun Mathematica versiyonunda kullanılan çapraz korelasyon yöntemi üzerinde çalışacak zamanım olup olmayacağımı bilmiyorum, fakat görüntünün kırmızı kısımlarındaki yerel standart sapma bu durumda Waldo'yu tespit ediyor gibi görünüyor ...

library(raster) 
waldo = stack("/Users/Benjamin/Desktop/DepartmentStore.jpg") 

r = waldo[[1]] - waldo[[2]] - waldo[[3]] 
r[is.na(r)] = 0 
r_mask = Which(r > 0) 
r_masked = r * r_mask 

focalsd = focal(r_masked, w=3, fun=sd) 
plot(focalsd) 
+4

Lütfen daha iyisi gelirse bu cevabı kabul etmekten çekinmeyin. Sadece cevap akışını başlatmayı umuyordum ... – Benjamin