R：返回最小正数

Question

我有一个带有正数和负数的数据框。 我需要返回的是最小的正数。 有没有这样做的功能？

 dfcount  <- data.frame(A=c(1,2,3,4,-5,-6,-7))

即minpositive（dfcount）返回1而不是-7

感谢您的帮助

Answer 1

这个功能可行：

minpositive = function(x) min(x[x > 0])

例如：

dfcount  <- data.frame(A=c(1,2,3,4,-5,-6,-7))
minpositive(dfcount)
# 1

Answer 2

这应该有效：

min(dfcount$A[dfcount$A > 0])