Logo

Greetings from The On-Line Encyclopedia of Integer Sequences!

Hints

Search: id:A016097
Displaying 1-1 of 1 results found. page 1
     Format: long | short | internal | text      Sort: relevance | references | number      Highlight: on | off
A016097 Least k such that k - phi(k) = n or 0 if impossible. +0
1
1, 4, 9, 6, 25, 10, 15, 12, 21, 0, 35, 18, 33, 26, 39, 24, 65, 34, 51, 38, 45, 30, 95, 36, 69, 0, 63, 52, 161, 42, 87, 48, 93, 0, 75, 54, 217, 74, 99, 76, 185, 82, 123, 60, 117, 66, 215, 72, 141, 0, 235, 0, 329, 78, 159, 98, 105, 0, 371, 84, 177, 122, 135, 96 (list; graph; listen)
OFFSET

1,2

MATHEMATICA

a = Table[0, {70}]; Do[b = n - EulerPhi[n]; If[b < 70 && a[[b + 1]] == 0, a[[b + 1]] = n], {n, 1, 10^4}]; a

CROSSREFS

Adjacent sequences: A016094 A016095 A016096 this_sequence A016098 A016099 A016100

Sequence in context: A061207 A140694 A074767 this_sequence A083717 A130041 A109987

KEYWORD

nonn

AUTHOR

Robert G. Wilson v (rgwv(AT)rgwv.com)

page 1

Search completed in 0.003 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 October 10 20:39 EDT 2008. Contains 144831 sequences.


AT&T Labs Research