将表连接到栅格属性表以使用重新分类的值python或R创建新栅格

Question

I'm trying to join a .csv file with a raster classification to create a raster with the new information.

The PatchID in the .csv file corresponds to the raster DN.

The .csv file looks like:

PatchID       area  shape_index 
      0   11592800        24.78
      1    2556440         7.02
      2    3562800        14.70
      3    2945450         2.48
      4    3892610         6.36
      5 7678785680        11.68
      6 1756784547         2.43

the Raster can look like:

0 0 0 0 0 0 1 1 1 1 0
0 0 2 2 0 0 1 1 0 0 0
0 0 0 2 2 0 0 0 0 3 3
0 0 2 0 2 0 4 4 0 3 3
0 0 0 0 2 0 0 4 0 0 3
0 5 0 0 0 0 4 4 0 0 0
0 5 5 5 0 0 0 0 0 6 6

the new raster should look like:

24.78 24.78 24.78 24.78 24.78 24.78  7.02  7.02  7.02  7.02 24.78
24.78 24.78 14.70 14.70 24.78 24.78  7.02  7.02 24.78 24.78 24.78
24.78 24.78 24.78 14.70 14.70 24.78 24.78 24.78 24.78  2.48  2.48
24.78 24.78 14.70 24.78 14.70 24.78  6.36  6.36 24.78  2.48  2.48
24.78 24.78 24.78 24.78 14.70 24.78 24.78  6.36 24.78 24.78  2.48
24.78 11.68 24.78 24.78 24.78 24.78  6.36  6.36 24.78 24.78 24.78
24.78 11.68 11.68 11.68 24.78 24.78 24.78 24.78 24.78  2.43  2.43

I can do the job by polygonizing the raster and join the table to the shapefile but this procedure is CPU-intensive.

Answer 1

Here an easy and fast solution (without join):

t((matrix(df[,"shape_index"][as.vector(m)+1],nrow=11,ncol=7)))
      [,1]  [,2]  [,3]  [,4]  [,5]  [,6]  [,7]  [,8]  [,9] [,10] [,11]
[1,] 24.78 24.78 24.78 24.78 24.78 24.78  7.02  7.02  7.02  7.02 24.78
[2,] 24.78 24.78 14.70 14.70 24.78 24.78  7.02  7.02 24.78 24.78 24.78
[3,] 24.78 24.78 24.78 14.70 14.70 24.78 24.78 24.78 24.78  2.48  2.48
[4,] 24.78 24.78 14.70 24.78 14.70 24.78  6.36  6.36 24.78  2.48  2.48
[5,] 24.78 24.78 24.78 24.78 14.70 24.78 24.78  6.36 24.78 24.78  2.48
[6,] 24.78 11.68 24.78 24.78 24.78 24.78  6.36  6.36 24.78 24.78 24.78
[7,] 24.78 11.68 11.68 11.68 24.78 24.78 24.78 24.78 24.78  2.43  2.43

In this code I'm using values from m as a position [+1 adjusted] in df$shape_index

Input data:

df<-data.frame(PatchID=c(0,1,2,3,4,5,6),
area=c(11592800,2556440,3562800,2945450,3892610,7678785680,1756784547),
shape_index=c(24.78,7.02,14.70,2.48,6.36,11.68,2.43))

m<-matrix(c(0,0,0,0,0,0,1,1,1,1,0,
0,0,2,2,0,0,1,1,0,0,0,
0,0,0,2,2,0,0,0,0,3,3,
0,0,2,0,2,0,4,4,0,3,3,
0,0,0,0,2,0,0,4,0,0,3,
0,5,0,0,0,0,4,4,0,0,0,
0,5,5,5,0,0,0,0,0,6,6),nrow=7,ncol=11)