Nearest的用法（Mathematica）

1、先给出一组数据：A = {76, 85, 73, 猱蝰逾鸾51, 55, 85, 62, 77, 78, 54, 8泌驾台佐3, 40, 68, 2, 69, 87, 4, 44, 21, 10, 73, 30, 78, 48, 0, 25, 88, 12, 47, 29, 89, 48, 9, 97, 49, 54, 34, 49, 43, 28, 71, 98, 7, 3, 98, 1, 26, 91, 82, 66, 2, 30, 68, 74, 95, 39, 30, 45, 18, 67, 47, 56, 45, 62, 93, 97, 44, 67, 59, 45, 86, 35, 55, 5, 53, 27, 40, 71, 13, 49, 43, 75, 18, 48, 73, 14, 70, 39, 45, 2, 21, 62, 29, 12, 5, 74, 1, 93, 100};然后找出离39最近的数据：Nearest[A, 39]

3、分别找出到8, 19, 30, 56最近的元素：Nearest[A, {8, 19, 30, 56}]

5、在平面上画出这些点，可以形象的看到，绿色点是距离红色点最近的点，比其它蓝色点都要近。Graphics[撑俯擂摔{PointSize[0.03],Blue, Point[A],Red, Point[{-2, 3}],Green,Point[B]}]

7、找出前三个比较接近蓝色的颜色：Nearest[A, Blue,3]