如何返回比数据框中每列最小值高10％的第1行？

Question

您好我有一个数据框，我想找到比最小值高10％的第一个值，并返回其行索引。这是每列。

    H11    H12
1   0.0899 0.0857
2   0.0873 0.0859
3   0.0881 0.0860
4   0.0928 0.0918
5   0.0936 0.0931
6   0.0921 0.0947
7   0.0919 0.0964
8   0.0926 0.0983
9   0.0934 0.1004
10  0.1159 0.2967
11  0.1174 0.3365
12  0.1186 0.3775
13  0.1199 0.4242
14  0.1217 0.4758
15  0.1231 0.5253

想法是返回类似的东西，

H11    H12
10    8

抱歉，我不是很擅长r，我不确定如何解决这个问题。 感谢

Answer 1

试试这个，并确保H12的结果是正确的，我得到6而不是8作为第一个元素超过最小值10％

> sapply(df, function(x) which(x > 1.1*min(x))[1])
H11 H12 
 10   6