OFFSET
1,2
COMMENTS
The following definition of nextprime(q) is used: if q is integer and prime, nextprime(q)=q. If q is integer and composite or rational, nextprime(q) is the smallest prime >q. [From R. J. Mathar, Oct 30 2010]
MAPLE
Contribution from R. J. Mathar, Oct 30 2010: (Start)
nprime := proc(n) if type(n, 'integer') then if isprime(n) then return n; else return nextprime(n) ; end if; else return nextprime(floor(n)) ; end if; end proc:
A175953 := proc(n) option remember; if n= 1 then 1; else p := procname(n-1)+(procname(n-1)+1)/4 ; return nprime(p) ; end if; end proc:
seq(A175953(n), n=1..120) ; (End)
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Juri-Stepan Gerasimov, Oct 29 2010
EXTENSIONS
More terms from R. J. Mathar, Oct 30 2010
STATUS
approved