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

Re: plot

• To: mathgroup at smc.vnet.net
• Subject: [mg58194] Re: [mg58184] plot
• From: "David Park" <djmp at earthlink.net>
• Date: Wed, 22 Jun 2005 01:55:37 -0400 (EDT)
• Sender: owner-wri-mathgroup at wolfram.com

[Some of the errors mentioned come from problems with how email
 is transmitted.  If posts are not pure ascii they can sometimes
 contain extra spaces or = signs.  I try to detect these but it
 it not always possible - moderator]

Your code is full of errors. Many symbols are undefined so there is no way
one could calculate a value or make a plot.  What is something like elev(r)
supposed to mean? What is Lo=g[size] supposed to mean? In one place you type
'siz e' with an extra space. No piece of what you have posted makes any
sense or will evaluate, including the very first statement.

If you cleaned up your typing and provided definitions for all the symbols
you might actually find that it worked, or at least be in a position to get
some useful help.

David Park
djmp at earthlink.net
http://home.earthlink.net/~djmp/

From: Bosch, Darrell [mailto:bosch at vt.edu]
To: mathgroup at smc.vnet.net


Dear Group,  Thanks to several of you for providing good suggestions to
my previous inquiry.  In the program below I am trying to solve an
equation for v, derive the solution with respect to size, and plot the
resulting solution.  The problem I have is in running the plot command.
I am trying to set numerical values for variables in the derivative
(other than size) and plot the derivative for size, but Mathematica
won't recognize the settings for the other values. Would appreciate any
suggestions.  Darrell


sol=Log[v]==-0.829923*(Log[size])+0.05652*(Log[size])^2+.000737*(Lo=
g[siz
e])^3-.002805*pop+.288472*(Log[elev])-.020531*soil1-.086192*soil2-.10992
9*Log[x]+.15501*Log[y]-.192311*Log[mall]+.024088*Log[town]+.044958*year

 sol2=Solve[sol,v]

 sol3=D[v /.  sol2[[1]],size]

 Plot [Evaluate[sol3/. elev(r)379.82, soil1(r)0,
soil2(r)1,mall(r)8861.89,town(r)8828.68,pop(r)5.9,x(r)24888.27,y(r)16881
.90,year(r)0,{size,100,1000}]]