Services & ResourcesWolfram ForumsMathGroup Archive

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

Why doesn't this work ?

• To: mathgroup@smc.vnet.net
• Subject: [mg10381] Why doesn't this work ?
• From: Andreas Keese <A.Keese@tu-bs.de>
• Date: Mon, 12 Jan 1998 04:10:11 -0500
• Organization: Institute of scientific computing, TU Braunschweig

Look at this:

This works:
  Clear[S1];
  S1=Sin[x];
  Plot[S1, {x, 0, 3}]

But why doesn't it work with more than one functions ?

  Clear[S2];
  S2={Sin[x],Cos[x]};
  Plot[S2, {x, 0, Pi}]

gives an error - Mathematica complains that S2 is not a machine-size
number. 

BTW: I don't want S2 to be pattern cause I want to use this as follows:
  
  Clear[S,dx,S3,x];
  S[x_]:={Sin[x/dx], Cos[x/dx], Sin[2*x/dx]};
  S3=Evaluate[S[x] /. dx -> 2];
  Plot[S3, {x, 0, Pi}];


Bye, 
Andreas

• Follow-Ups:
  • Re: Why doesn't this work ?
    • From: seanross@worldnet.att.net