Logo

Greetings from The On-Line Encyclopedia of Integer Sequences!

Hints

Search: id:A102261
Displaying 1-1 of 1 results found. page 1
     Format: long | short | internal | text      Sort: relevance | references | number      Highlight: on | off
A102261 a(n) = A002144(n) - A002145(n). +0
4
2, 6, 6, 10, 14, 10, 10, 14, 14, 22, 26, 22, 26, 10, 30, 22, 26, 34, 30, 30, 30, 50, 42, 42, 46, 46, 50, 42, 42, 50, 46, 54, 42, 42, 42, 42, 38, 34, 30, 38, 14, 18, 18, 18, 46, 54, 62, 70, 78, 78, 90, 78, 66, 54, 70, 66, 62, 66, 58, 70, 66, 86, 98, 78, 78, 54, 70, 70, 78, 78 (list; graph; listen)
OFFSET

1,1

MAPLE

A002144 := proc(n) option remember ; if n = 1 then RETURN(5) ; fi; for a from procname(n-1)+2 do if isprime(a) and (a mod 4 = 1 ) then RETURN(a) ; fi; od: end; A002145 := proc(n) option remember ; if n = 1 then RETURN(3) ; fi; for a from procname(n-1)+2 do if isprime(a) and (a mod 4 = 3 ) then RETURN(a) ; fi; od: end; A102261 := proc(n) A002144(n)-A002145(n) ; end: seq(A102261(n), n=1..120) ; [From R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Feb 07 2009]

CROSSREFS

Sequence in context: A006955 A063210 A114718 this_sequence A147298 A078636 A083482

Adjacent sequences: A102258 A102259 A102260 this_sequence A102262 A102263 A102264

KEYWORD

nonn

AUTHOR

Paul Curtz (bpcrtz(AT)free.fr), Sep 06 2008

EXTENSIONS

Edited by N. J. A. Sloane (njas(AT)research.att.com), Sep 06 2008

More terms from R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Feb 07 2009

page 1

Search completed in 0.002 seconds

Lookup | Welcome | Find friends | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Transforms | Puzzles | Hot | Classics
More pages | Superseeker | Maintained by N. J. A. Sloane (njas@research.att.com)

Last modified November 25 20:09 EST 2009. Contains 167514 sequences.


AT&T Labs Research