R 是否有一种基于一列条件提取行的方法？

我希望提取第4行、第11行等的所有列。如果您查看我发布的数据，我希望提取列“xsampa”中紧靠“A”前面的行值。例如，第4行的所有列（出现在第5行之前，在“xsampa”列中包含“A”）。我可以手动提取它们，但任何更好的方法都肯定会为我节省一些劳力

如果你能帮我的话，非常感谢

Filename Speaker Consonant      tdiff xsampa
1  AK_baagge.TextGrid       1  Geminate 0.23165381      B
2  AK_baagge.TextGrid       1  Geminate 0.09607762      b
3  AK_baagge.TextGrid       1  Geminate 0.15799431     A:
4  AK_baagge.TextGrid       1  Geminate 0.08753738     g:
5  AK_baagge.TextGrid       1  Geminate 0.02668823      A
6  AK_baagge.TextGrid       1  Geminate 0.12917102     e:
7  AK_baagge.TextGrid       1  Geminate 0.87323879      E
8   AK_baagi.TextGrid       1 Singleton 0.22415281      B
9   AK_baagi.TextGrid       1 Singleton 0.11448148      b
10  AK_baagi.TextGrid       1 Singleton 0.15873483     A:
11  AK_baagi.TextGrid       1 Singleton 0.09716495      g
12  AK_baagi.TextGrid       1 Singleton 0.05387364      A
13  AK_baagi.TextGrid       1 Singleton 0.10125358     i:
14  AK_baagi.TextGrid       1 Singleton 0.70685099      E
15   AK_baga.TextGrid       1 Singleton 0.78044616      B
16   AK_baga.TextGrid       1 Singleton 0.09659531      b
17   AK_baga.TextGrid       1 Singleton 0.09220461      @
18   AK_baga.TextGrid       1 Singleton 0.05159068      g
19   AK_baga.TextGrid       1 Singleton 0.13482446     A:
20   AK_baga.TextGrid       1 Singleton 0.46999388      E

---

正如@Jon Spring在评论中回答的，这个问题的答案是使用dplyr:：lead（）函数而不是lag（）。这样，列“xsampa”中包含值“A”的所有行都将被过滤并生成所需的输出

lag（）函数只会在输入后面生成一行

答复:

mydata_new<- mydata %>% filter(lead (xsampa) == "A")

---

my_data%>%filter（滞后（xsampa）=“A:”）

@JonSpring再次感谢！我理解这里的“lag”是提取“A:”之前的行。我的输出应该是前面有“A”而不是“A:”的行。当我尝试用“A”替换“A:”时，lag（）会输出不需要的行。也许，lead（）函数？如果您已经得到了答案，而不是编辑问题以包含答案，那么您可以将答案放在下面的答案部分，这可能会对未来的访问者有所帮助。你可以回答自己的问题。啊哈，谢谢@Pranav_b的澄清。我没有仔细阅读，只注意到前面的“A:”而不是后面的“A”。无论如何，你应该添加你的答案，很高兴你找到了。@RonakShah哈哈，从来都不知道我们可以发布自己的答案。谢谢

Filename Speaker Consonant      tdiff xsampa
1    AK_baagge.TextGrid       1  Geminate 0.08753738     g:
2     AK_baagi.TextGrid       1 Singleton 0.09716495      g
3     AK_bagga.TextGrid       1  Geminate 0.11573271     g:
4     AK_buute.TextGrid       1 Singleton 0.08538239     t`
5    AK_buutte.TextGrid       1  Geminate 0.21568940    t`:  
6   AK_chaakki.TextGrid       1  Geminate 0.12341936     k:
7     AK_chape.TextGrid       1 Singleton 0.06812137      p
8    AK_chappe.TextGrid       1  Geminate 0.14723284     p:
9      AK_fati.TextGrid       1 Singleton 0.06677743     t`
10    AK_fatti.TextGrid       1  Geminate 0.13503550    t`:
11     AK_gada.TextGrid       1 Singleton 0.06472276    d_d
12    AK_gadda.TextGrid       1  Geminate 0.13475387   d_d:
13   AK_jaaddi.TextGrid       1  Geminate 0.12847036   d_d:
14    AK_jaadi.TextGrid       1 Singleton 0.06732941    d_d
15    AK_katha.TextGrid       1 Singleton 0.01338915  t_d_h
16     AK_kute.TextGrid       1 Singleton 0.04600485    t_d
17    AK_kutte.TextGrid       1  Geminate 0.15318115   t_d:
18  AK_raajegi.TextGrid       1 Singleton 0.03868537     dZ
19 AK_raajjegi.TextGrid       1  Geminate 0.10578673    dZ:
20     AK_sada.TextGrid       1 Singleton 0.05504982    d_d