Mathematica从列表中选择受分析函数约束的元素

Question

对于一些二维点列表， 例如data = {{1,2}，{3,4}，{3,6}}，

和一些分析功能，例如f [x] = x ^ 2，

我想只选择那些位于曲线下方的点，即测试每个点是否为f [x]> y，并消除那些错误的点。

我尝试使用Select执行此操作。类似于：选择[data，＃list1＆gt; ＃[[2]]＆amp;] [[全部，1]]

其中list1是由某个域上的随机x值列表生成的f [x]值列表，

e.g。 list1 = {3.285,2.245,7.413}

但无济于事。我想我实际上是在尝试比较两个列表（数据和list1的第二个元素），test更大，并消除那些未通过测试的点。有什么提示吗？

Answer 1

data = RandomReal[{0, 1}, {100, 2}];
f[x_] := x^2
data1 = Select[data, #[[2]] < f[#[[1]]] &];
Show[Plot[f[x], {x, 0, 1}], ListPlot@data1]