User Portlet
| 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. |