Table[N[ProductLog[k,E]-1],{k,0,10}]