Here is one way:

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.}

EDIT

Here is a much shorter and more direct way to get the same:

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.}