Mathematica 9 is now available
Student Support Forum
-----
Student Support Forum: 'Problem with mapping. Probably a basic problem' topicStudent Support Forum > General > "Problem with mapping. Probably a basic problem"

< Previous CommentHelp | Reply To Comment | Reply To Topic
Author Comment/Response
Bill Simpson
10/17/12 11:38am

Is this what you want?

In[1]:= zrange=Range[3];
data=Map[{z=#;
z,
FindRoot[Integrate[1/14 (r^2) (((2 (z^(3/2)) E^(-z*r))^2)+9 (((1/(3^.5)) ((z/2)^(3/2)) (z*r) (E^(-(z*r)/2)))^2)+4 ((2/27) ((2/5)^.5) ((z/3)^(3/2)) ((z*r)^2) (E^(-(z*r)/3)))^2),{r,0,L}]\[Equal].9,{L,1}][[1]][[2]]}&,zrange]

Out[1]= {{1,11.7958},{2,5.89788},{3,3.93192}}

All I did was initialize z to be the value of the item in zrange that you were mapping over.

URL: ,

Subject (listing for 'Problem with mapping. Probably a basic problem')
Author Date Posted
Problem with mapping. Probably a basic problem Max 10/16/12 10:07pm
Re: Problem with mapping. Probably a basic prob... Bill Simpson 10/17/12 11:38am
< Previous CommentHelp | Reply To Comment | Reply To Topic