ID <- c ("ABC_10","AZM_11","ABC_11","ABC_12",
"ABC_13","AZM_12","ABC_14","ABC_15",
"CZX_10","CZX_11","CZX_12","CZX_13",
"FIN_10","FIN_11","FIN_12","FIN_13",
"FNM_10","FNM_11","FXS_10","FXS_11")
Id.n <- c(345,380,339,361,
245,390,639,661,
545,580,539,261,
345,180,139,261,
1045,1580,39,161)
df <- data.frame(ID,Id.n)
一個數據幀我試圖子集此數據幀具有下列條件
Threshold of ID.n's for FXS - 100
Threshold of ID.n's for FIN - 200
Threshold of ID.n's for all Other ID's - 300
我期望的輸出是
ID Id.n
ABC_10 345
AZM_11 380
ABC_11 339
ABC_12 361
AZM_12 390
ABC_14 639
ABC_15 661
CZX_10 545
CZX_11 580
CZX_12 539
FIN_10 345
FIN_13 261
FNM_10 1045
FNM_11 1580
FXS_11 161
我正在嘗試做這種方式,但只是沒有得到正確的。
df <- subset(df,ifelse(grepl("FXS",df$ID), df$ID.n > 100,))
有人能指出我正確的方向嗎?
感謝您指出。 – Sharath