1,3
f[x_] := Prime[f[x-2]+f[x-1]] {f[1]=1, f[2]=1}; Table[f[w], {w, 1, 25}]
Cf. A069103, A082094, A082095.
Sequence in context: A088095 A173280 A141477 * A119325 A048722 A061955
Adjacent sequences: A082093 A082094 A082095 * A082097 A082098 A082099
nonn
Labos E. (labos(AT)ana.sote.hu), Apr 11 2003