OFFSET
7,1
MAPLE
A160673 := proc(n)
if n = 7 then
8402963;
else
for d from 1 to 9 by 2 do
if isprime(10*procname(n-1)+d )then
return 10*procname(n-1)+d ;
end if;
end do:
return -1 ;
end if;
end proc:
for n from 7 to 17 do
printf("%d, \n", A160673(n)) ;
end do: # R. J. Mathar, Oct 15 2011
CROSSREFS
KEYWORD
base,easy,fini,full,nonn,less
AUTHOR
Vladislav-Stepan Malakhovsky and Juri-Stepan Gerasimov, May 23 2009
EXTENSIONS
Corrected by R. J. Mathar, Oct 15 2011
STATUS
approved