[Rajendra Sharma]Image Processing and Analysis in R

相似文件 换一批

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

1. Image Processing and Analysis in R
   
2. 
   
3. By: Rajendra Sharma | June 12, 2015       
   
4.      
   
5. Performing Image processing and analysis in R, installation of EBImage package is required. Execute the below code to get package installed in R.
   
6. 
   
7. source("http://bioconductor.org/biocLite.R")
   
8. biocLite()
   
9. biocLite("EBImage")

复制代码

本帖隐藏的内容

Image Processing and Analysis in R.pdf (445.5 KB)

2017-8-22 03:31:30 上传

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏2 回帖

关键词：Processing processI Analysis Process Analysi

1. Performing the Reading, Writing and displaying of Image
   
2. The loading of package will be done by using the below command.
   
3. 
   
4. library (EBImage)
   
5. Reading Image:The readImage function is used to read Image from file location or URLs
   
6. 
   
7. Image <- readImage("C:\\Users\\Public\\Pictures\\Sample Pictures\\ Penguins.jpg")
   
8. Displaying Image: Image can be displayed using display function and pixel intensities should range from 0 (black) to 1 (white)
   
9. 
   
10. display (Image)

复制代码

1. Image Filtering
   
2. 
   
3. Images can be linearly filtered using filter2. Low-pass filtering is used to perform blur image, remove noise, etc. High-pass filtering is used to perform detect edges, sharpen images etc., various filter shapes can be generated using makeBrush.
   
4. 
   
5. #LOW-PASS Filtering image
   
6. flo = makeBrush(21, shape='disc', step=FALSE)^2
   
7. flo = flo/sum(flo)
   
8. imgflo = filter2(Image, flo)
   
9. display(imgflo)
   
10. #HIGH-PASS Filtering image
    
11. fhi = matrix(1, nc=3, nr=3)
    
12. fhi[2,2] = -8
    
13. imgfhi = filter2(Image, fhi)
    
14. display(imgfhi)

复制代码

1. Color Management
   
2. The function colorMode can access and change the value of the slot colormode, altering the rendering mode of an image. In this, the Color image (Image) with one frame is changed into a Grayscale, corresponding to the red, green and blue channels.
   
3. 
   
4. >print(Image)
   
5. Image
   
6.   colorMode    : Color
   
7.   storage.mode : double
   
8.   dim          : 1024 768 3
   
9.   frames.total : 3
   
10.   frames.render: 1
    
11. 
    
12. imageData(object)[1:5,1:6,1]
    
13.           [,1]      [,2]      [,3]      [,4]      [,5]      [,6]
    
14. [1,] 0.4549020 0.4549020 0.4627451 0.4588235 0.4666667 0.4745098
    
15. [2,] 0.4627451 0.4549020 0.4588235 0.4588235 0.4627451 0.4666667
    
16. [3,] 0.4627451 0.4588235 0.4588235 0.4627451 0.4588235 0.4588235
    
17. [4,] 0.4705882 0.4627451 0.4627451 0.4627451 0.4627451 0.4627451
    
18. [5,] 0.4627451 0.4549020 0.4627451 0.4627451 0.4627451 0.4666667
    
19. 
    
20. >#Greyscale Image
    
21. >colorMode(Image) <- Grayscale
    
22. >display(Image)

复制代码

谢谢分享资料

kankan

谢谢楼主分享！

Thanks

谢谢楼主分享！