Rは、対応する列には値

Question

私はこのようになりますDFを持っているが存在しないそのための列の最大値を見つける：私はDまたは値を持たない最後の行を見つける方法を知っていただきたいと思い

をLをループのヒストグラムのx軸プロット制限として設定したいからです。 私はrowname値（ここでは実際には長さに対応する）が必要ですが、これは最高の値です）、他の長さも0値（つまりこのdfの51のような値）がありますが、値の後に他の長さがない長さ（このdf = 60）。

> t4 
      D   L 
5 0.00000 0.00000 
6 0.00000 0.00000 
7 0.00000 0.00000 
8 0.00000 0.00000 
9 0.00000 0.00000 
10 2.83726 0.28757 
11 1.84987 0.28757 
12 5.03907 0.00000 
13 9.88651 0.00000 
14 17.70186 0.00000 
15 17.79735 0.00000 
16 22.11712 0.00000 
17 15.28029 0.00000 
18 18.78395 0.20838 
19 35.36764 0.00000 
20 32.69343 0.00000 
21 34.89597 0.00000 
22 45.05710 0.00000 
23 52.12515 0.00000 
24 56.68825 0.10399 
25 42.82138 2.70632 
26 43.87267 9.75719 
27 40.92407 17.95513 
28 48.11841 21.02564 
29 48.36029 31.34945 
30 39.96910 69.62344 
31 41.95327 63.31533 
32 48.08798 111.20725 
33 35.59892 82.59722 
34 27.07698 209.27335 
35 31.77831 192.61394 
36 31.61700 298.17208 
37 20.90314 353.80105 
38 14.74480 322.15964 
39 15.83181 326.86597 
40 20.77642 409.25021 
41 2.65196 370.75941 
42 7.51343 396.27318 
43 2.72389 386.30825 
44 5.08969 468.23395 
45 5.57108 456.78302 
46 4.05819 418.21052 
47 0.16106 376.49471 
48 1.27724 332.54223 
49 1.25692 264.52353 
50 1.25692 198.16843 
51 0.00000 0.00000 
52 0.00000 186.77477 
53 0.00000 208.19134 
54 3.68738 171.52916 
55 0.00000 127.77642 
56 8.80174 157.18997 
60 0.00000 0.00000 
61 0.00000 0.00000 

Answer 1

1つの方法は、githubのsmwrBase :: eventNumを使用することです。以下は、D & L == 0の最後のレコードだけでt4aを返します。次に、最初のレコード（つまり、t4a 1）をピックアップして、最後の非ゼロエントリの後にレコードを取得します。

library(smwrBase) # from https://github.com/USGS-R 
t4a<-t4[smwrBase::eventNum(t4$D==0 & t4$L==0, reset=TRUE)== 
     max(smwrBase::eventNum(t4$D==0 & t4$L==0, reset=TRUE)),]