500*_*500 4 logging wolfram-mathematica mathematica-8
我想测试几个强度值.
我需要它们以对数间隔从1到1000.但我只使用1,10,100,1000,但我希望有更多的数据点,让我们说10.
如何在Mathematica中找到1到1000之间的10个对数间隔数?
Nak*_*lon 17
如果a是开始,c则结束并且b是间隔数:
{a, b, c} = {1, 10, 1000};
t = (c/a)^(1/b) // N
a*t^Range[b]
1.99526
{1.99526, 3.98107, 7.94328, 15.8489, 31.6228, 63.0957, 125.893, 251.189, 501.187, 1000.}
Run Code Online (Sandbox Code Playgroud)
我N只是为了看得更清楚,我们有什么.
这是一种方式:
In[11]:= base = Block[{a}, a /. NSolve[a^9 == 1000, a][[-1, 1]]]
Out[11]= 2.15443
In[13]:= base^Range[0, 9]
Out[13]= {1., 2.15443, 4.64159, 10., 21.5443, 46.4159, 100.,
215.443,464.159, 1000.}
Run Code Online (Sandbox Code Playgroud)
编辑
这是一个更短,更直接的方法来获得相同:
In[18]:= N[10^Range[0, 3, 1/3]]
Out[18]= {1., 2.15443, 4.64159, 10., 21.5443, 46.4159, 100.,
215.443, 464.159, 1000.}
Run Code Online (Sandbox Code Playgroud)
| 归档时间: |
|
| 查看次数: |
4198 次 |
| 最近记录: |