Re: How can I find the closest distance between a specified point and an interpolation curve?
- To: mathgroup at smc.vnet.net
- Subject: [mg27273] Re: How can I find the closest distance between a specified point and an interpolation curve?
- From: Erich Mueller <emuelle1 at uiuc.edu>
- Date: Sat, 17 Feb 2001 03:30:45 -0500 (EST)
- Organization: University of Illinois at Urbana-Champaign
- References: <96is0i$dg6@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
Here is a brute force way: First calculate the square of the distance
from each point in "Pointset" to the given point
distset = (# - pt).(# - pt) & /@ Pointset
The result is
{50, 52, 85, 101, 170, 293, 409, 1274}
So the closest point is {0,0}.
Erich
On 16 Feb 2001, liwen liwen wrote:
> Dear friends,
> Here is a curve that is produced by
> Interpolation[PointSet] function,
> Pointset={{0,0},{1,1},{3,4},{4,5},{6,8},{7,12},{8,15},{12,30}}.
>
> Fc=Interpolation[PointSet].
> the specified point is:
> pt={5,-5}
> I want to find the closest distance between the point
> of pt and Fc ?
>
> Please help!
>
> Best regards,
> Liwen 2/15/2001
>
> __________________________________________________
> Do You Yahoo!?
> Get personalized email addresses from Yahoo! Mail - only $35
> a year! http://personal.mail.yahoo.com/
>
>