Logo

Greetings from The On-Line Encyclopedia of Integer Sequences!

Hints

Search: id:A104192
Displaying 1-1 of 1 results found. page 1
     Format: long | short | internal | text      Sort: relevance | references | number      Highlight: on | off
A104192 a(n) = Prime[n]-EulerPhi[n] +0
1
1, 2, 3, 5, 7, 11, 11, 15, 17, 25, 21, 33, 29, 37, 39, 45, 43, 55, 49, 63, 61, 69, 61, 81, 77, 89, 85, 95, 81, 105, 97, 115, 117, 123, 125, 139, 121, 145, 143, 157, 139, 169, 149, 173, 173, 177, 165, 207, 185, 209, 201, 215, 189, 233, 217, 239, 233, 243, 219, 265, 223 (list; graph; listen)
OFFSET

1,2

MATHEMATICA

a== Table[Prime[n] - EulerPhi[n], {n, 1, 200}]

CROSSREFS

Sequence in context: A053724 A046220 A060264 this_sequence A104193 A117288 A117283

Adjacent sequences: A104189 A104190 A104191 this_sequence A104193 A104194 A104195

KEYWORD

nonn

AUTHOR

Roger Bagula (rlbagulatftn(AT)yahoo.com), Mar 12 2005

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 July 26 23:19 EDT 2008. Contains 142293 sequences.


AT&T Labs Research