# User Portlet

Luke Schutzenhofer
Discussions
Decided to try an experiment In[1]:= f[x_] = Sin[x]*Sin[3 x]; In[10]:= NIntegrate[f[x], {x, 0, 10}] Out[10]= 0.135097 In[12]:= pts = Sort[RandomReal[{0, 10}, 100]]; In[14]:= data = Table[{pts[[i]],...
Or In[1]:= {a, 1} # & /@ {{x1, y1}, {x2, y2}, {x3, y3}, {x4, y4}} Out[1]= {{a x1, y1}, {a x2, y2}, {a x3, y3}, {a x4, y4}} (Short notation for In6 in Bill Simpson's list.)
Questions: 1.Yes. 2.You don't need them.They are marked as comments. (* "text" *)
I tried it for "n=500" and it worked. I was just unsure. Many thanks !!!!!!!!!!!!!!!!!!!!!!!!!!!! You always a good job
Given an integral with a goal to plot the output as a function of one of the variable in the integrand.
I added assumptions, changed the Abs to Sqrt[(x-y)^2], and changed the bottom of the domain from the approximate 0.001 to exact 1/1000 to make things easier for Integrate. This took an hour and a half of CPU time. (The indefinite integral took a...
Thanks David, I did as you suggested and the Greek symbol appeared. I used it to copy and paste where the symbol was needed and it worked great. Thanks
My apologies for not replying to your earlier post. I had missed it. I am pleased that things have worked out well for you. Best of luck
(When you say in your Notebook that the X's aren't right, is that because the X's (or rather your values for f) were integrated, too?) Yes Thanks; everything seemed to work ok except the calculation takes a long time and below is a comparison of...
Ah, I see... something for a Wolfram person to answer.