login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A276374 Numbers n such that A240024(n) = A002808(n). 2
5, 6, 8, 13, 14, 24, 26, 31, 32, 34, 51, 54, 57, 62, 69, 82, 83, 93, 99, 113, 114, 119, 125, 132, 133, 139, 143, 145, 151, 161, 165, 181, 182, 192, 195, 212, 217, 219, 224, 233, 266, 282, 293, 295, 304, 311, 312, 318, 325, 338, 354, 364, 369, 375, 376, 382 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

LINKS

Peter Kagey, Table of n, a(n) for n = 1..10000

MATHEMATICA

c = Select[Range@ 500, CompositeQ]; a = {1, 4}; Do[k = 6; While[Or[PrimeQ@ k, MemberQ[a, k], CoprimeQ[a[[i - 1]], k]], k++]; AppendTo[a, k], {i, 3, Length@ c}]; Flatten@ Position[Union /@ Transpose@ {a, c}, w_ /; Length@ w == 1] (* Michael De Vlieger, Sep 01 2016 *)

PROG

(Haskell)

a276374 n = a276374_list !! (n - 1)

a276374_list = filter (\i -> a240024 i == a002808 i) [1..]

CROSSREFS

Cf. A002808, A240024, A276375.

Sequence in context: A120131 A047437 A188054 * A184803 A096467 A323041

Adjacent sequences:  A276371 A276372 A276373 * A276375 A276376 A276377

KEYWORD

nonn

AUTHOR

Peter Kagey, Aug 31 2016

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 February 19 18:30 EST 2019. Contains 320327 sequences. (Running on oeis4.)