如何刪除R中

Question

基礎上最後一排值某些列我有這樣

1112 1232 1233 1233 1232 1111 0000 
    1111 1111 0000 1211 0001 1110 1212 
    1212 1111 1111 1111 1111 1111 1111 
    1111 1111 1111 1111 1111 1111 1111 
    20 121 12 50 12 11 9 

我想根據最後一行的值刪除這些列中的數據幀。作爲一個例子，如果最後一行中的值是大於20或者更大或小於10時，將被刪除的整個列和所述輸出是這樣

1112 1233 1232 1111 
1111 0000 0001 1110 
1212 1111 1111 1111 
1111 1111 1111 1111 
20 12 12 11 

任何建議，將不勝感激..

Answer 1

我們提取最後一行（tail(df1,1)），unlist它創建一個vector（'v1'），然後根據邏輯條件，我們將數據集的列子集。

v1 <-unlist(tail(df1,1)) 
df1[!(v1 > 20 | v1<10)] 
# v1 v3 v5 v6 
#1 1112 1233 1232 1111 
#2 1111 0 1 1110 
#3 1212 1111 1111 1111 
#4 1111 1111 1111 1111 
#5 20 12 12 11