我是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的值。
希望这个表输出有帮助。
答案 0 :(得分:0)
欢迎来到SO,尝试类似:
print(mydata[which(mydata$'DISTANCE'==minDistance),4:7])