MathGroup Archive 2002

[Date Index] [Thread Index] [Author Index]

Search the Archive

RE: help with mathematica problem

  • To: mathgroup at smc.vnet.net
  • Subject: [mg34568] RE: [mg34557] help with mathematica problem
  • From: "Annetts, Dave (E&M, North Ryde)" <David.Annetts at csiro.au>
  • Date: Wed, 29 May 2002 02:44:07 -0400 (EDT)
  • Sender: owner-wri-mathgroup at wolfram.com

Hi,

> Hi, I'm having trouble solving the following problem:
> 
> Plot the circle parallel to the yz plane of radius 1.5 
> centred at (2,3,2).
> 
> the problem is here:
> 
> Evaluate[{2,3,2} + 1.5 {Cos[t], Sin[t], 0}]
> 
> I don't know what to put above.

ftn = r * {Cos[t], Sin[t], 0.};
ParametricPlot3D[Evaluate[{2, 3, 2} + ftn /. r -> 1.5], {t, 0, 2 \[Pi]}];

works just fine ...

Regards,

Dave.
--------------------------------------------------------
  Dr. David Annetts             EM Modelling Analyst
  Tel: (+612) 9490 5416         CSIRO DEM, North Ryde
  Fax: (+612) 9490 5467         David.Annetts at csiro.au
                 Include "usual_disclaimers"
--------------------------------------------------------


  • Prev by Date: RE: Define a function
  • Next by Date: RE: help with mathematica problem
  • Previous by thread: RE: help with mathematica problem
  • Next by thread: RE: help with mathematica problem