R Language
래스터 및 이미지 분석
수색…
소개
GLCM 텍스처 계산
Gray Level Co-Occurrence Matrix (Haralick et al., 1973) 텍스처는 이미지 분석을위한 강력한 이미지 특징이다. glcm
패키지는 R의 RasterLayer
객체에 대한 그러한 합법적 인 기능을 계산하는 사용하기 쉬운 기능을 RasterLayer
합니다.
library(glcm)
library(raster)
r <- raster("C:/Program Files/R/R-3.2.3/doc/html/logo.jpg")
plot(r)
GLCM 텍스처를 한 방향으로 계산
rglcm <- glcm(r,
window = c(9,9),
shift = c(1,1),
statistics = c("mean", "variance", "homogeneity", "contrast",
"dissimilarity", "entropy", "second_moment")
)
plot(rglcm)
계산 회전 불변 텍스쳐 피처
텍스처의 특징은 또한 4 방향 (0 °, 45 °, 90 °, 135 °)으로 계산 된 다음 하나의 회전 불변 텍스처에 결합 될 수 있습니다. 이를위한 핵심은 shift
매개 변수입니다.
rglcm1 <- glcm(r,
window = c(9,9),
shift=list(c(0,1), c(1,1), c(1,0), c(1,-1)),
statistics = c("mean", "variance", "homogeneity", "contrast",
"dissimilarity", "entropy", "second_moment")
)
plot(rglcm1)
수학 형태학
mmand
패키지는 n 차원 배열에 대한 수학 Morphologies의 계산을위한 함수를 제공합니다. 약간의 해결 방법을 통해 래스터 이미지에 대해서도 계산할 수 있습니다.
library(raster)
library(mmand)
r <- raster("C:/Program Files/R/R-3.2.3/doc/html/logo.jpg")
plot(r)
처음에는 커널 (움직이는 창)을 크기 (예 : 9x9)와 모양 유형 (예 : disc
, box
또는 diamond
)으로 설정해야합니다.
sk <- shapeKernel(c(9,9), type="disc")
그 후, 래스터 레이어는 erode()
함수에 대한 입력으로 사용되는 배열로 변환되어야합니다.
rArr <- as.array(r, transpose = TRUE)
rErode <- erode(rArr, sk)
rErode <- setValues(r, as.vector(aperm(rErode)))
erode()
외에도 형태 학적 함수 dilate()
, opening()
및 closing()
을 이와 같이 적용 할 수 있습니다.
plot(rErode)
Modified text is an extract of the original Stack Overflow Documentation
아래 라이선스 CC BY-SA 3.0
와 제휴하지 않음 Stack Overflow