[程式] 請教R程式

看板Statistics作者 (碎形)時間13年前 (2011/03/08 13:32), 編輯推噓1(108)
留言9則, 1人參與, 最新討論串1/4 (看更多)
[軟體程式類別]: R 請填入軟體程式類別 例如SAS、SPSS、R、EVIEWS...等 [程式問題]: 資料處理 資料處理、迴歸、敘述統計、logistic、probit...等 [軟體熟悉度]: 請把以下不需要的部份刪除 新手(不到1個月) [問題敘述]: 請詳盡敘述遭遇到的問題,可能的話,分點敘述你要處理的流程 假設有一組資料: [,1] [,2] [,3] [1,] 8 12 3 [2,] 4 5 6 [3,] 11 14 10 [4,] 9 15 2 [5,] 7 1 13 想找出第一行大於7(8、11、9),且在第三行中是最小的(3、10、2)資料 是全部資料的第幾筆資料(4) 請問這語法該怎麼表示? 目前只知道 which.min(data[,3]) 可以找出第三行中最小值出現在第4個位置 但是如果要加上新的條件(第一行要大於7) 則語法需要怎麼表示,再請大家幫忙,謝謝 [程式範例]: 雖然張貼程式很可怕,但基本上有些程式還是要張貼才能解決 ----------------------------------------------------------------------------- -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 140.128.67.244

03/08 15:16, , 1F
data[data[,1]>7 & data[,3]%in%min(data[,3]),]
03/08 15:16, 1F

03/08 15:19, , 2F
上面那行是錯的
03/08 15:19, 2F

03/08 15:25, , 3F
data2 <- cbind( data , rep(-1,dim(data)[1]) )
03/08 15:25, 3F

03/08 15:26, , 4F
tmp <- data2[data2[,1]>7,]
03/08 15:26, 4F

03/08 15:26, , 5F
tmp[,4] <- tmp[,3] %in% min(tmp[,3])
03/08 15:26, 5F

03/08 15:26, , 6F
data2[index,] <- tmp
03/08 15:26, 6F

03/08 15:26, , 7F
result <- which(tmp[,4])
03/08 15:26, 7F

03/08 15:26, , 8F
我沒時間測試了 你自己測一下吧
03/08 15:26, 8F

03/08 15:27, , 9F
還是不對 我發文好了
03/08 15:27, 9F
文章代碼(AID): #1DTRzZ1B (Statistics)
討論串 (同標題文章)
文章代碼(AID): #1DTRzZ1B (Statistics)