login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A174254 p-x^x where p is prime number and x is largest integer such that x^x is smaller than p. 1
1, 2, 1, 3, 7, 9, 13, 15, 19, 2, 4, 10, 14, 16, 20, 26, 32, 34, 40, 44, 46, 52, 56, 62, 70, 74, 76, 80, 82, 86, 100, 104, 110, 112, 122, 124, 130, 136, 140, 146, 152, 154, 164, 166, 170, 172, 184, 196, 200, 202, 206, 212, 214, 224, 1, 7, 13, 15, 21, 25, 27, 37, 51, 55, 57 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,2

COMMENTS

1^1=1;2-1=1,3-1=2, 2^2=4;5-4=1,7-4=3,11-4=7,13-4=9,...3^3=27;29-27=2,31-27=4,..

LINKS

Table of n, a(n) for n=1..65.

MATHEMATICA

f[n_]:=Module[{k=1}, While[n>k^k, ++k]; k-1]; Table[p=Prime[n]; a=f[p]; Prime[n]-a^a, {n, 6!}]

xn[n_]:=Module[{x=Floor[Log[n]/ProductLog[Log[n]]]}, n-x^x]; xn/@Prime[ Range[ 70]] (* Harvey P. Dale, Oct 15 2015 *)

CROSSREFS

Cf. A000040, A000312

Sequence in context: A174400 A178079 A258987 * A024404 A077173 A063509

Adjacent sequences:  A174251 A174252 A174253 * A174255 A174256 A174257

KEYWORD

nonn

AUTHOR

Vladimir Joseph Stephan Orlovsky, Mar 13 2010

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified May 11 06:03 EDT 2021. Contains 343784 sequences. (Running on oeis4.)