从R中的表中打印行

时间:2018-05-04 08:46:46

标签: r printing where

我是R的新手,当我满足条件时,我试图在控制台中显示几行。我通过互联网搜索,找不到合适的解决方案。目前,我已经尝试了R where子句,但收效甚微。

这是我的剧本。

#Coordinates
northing <- 398380.16
easting <- 6873865.89

filePath = '/media/jgm/Toshiba\ HDD/SatelliteData/data/'
file = 'MOD09GQ_2006075.csv'
mydata <- read.table(paste(filePath,file, sep = ""),header=TRUE,sep=",")
mydata$'(x-northing)²' <- (mydata$x-northing)**2
mydata$'(y-easting)²' <- (mydata$y-easting)**2
mydata$'DISTANCE' <- sqrt(mydata$`(x-northing)²`+mydata$`(y-easting)²`)
minDistance <- min(mydata[,10], na.rm = T)

当DISTANCE列的值为minDistance时,我想在控制台中显示列sur_refl_b01,sur_refl_b02,NDVI和NDVI_SCALED的值。

希望这个表输出有帮助。

1 个答案:

答案 0 :(得分:0)

欢迎来到SO,尝试类似:

print(mydata[which(mydata$'DISTANCE'==minDistance),4:7])