A251595 Distinct terms in A251416.

2, 3, 4, 5, 6, 7, 10, 11, 13, 17, 18, 19, 23, 29, 31, 37, 41, 43, 47, 53, 59, 61, 67, 71, 73, 79, 83, 89, 97, 101, 103, 107, 109, 113, 127, 131, 137, 139, 149, 151, 157, 163, 167, 173, 179, 181, 191, 193, 197, 199, 211, 223, 227, 229, 233, 239, 241, 251, 257

Offset

1,1

Comments

A251417(n) gives number of repetitions of a(n) in A251416;

a(n) = prime(n-4) for n > 11 according Bradley Klee's conjecture, empirically confirmed for the first 10000 primes;

equivalent: A098551(a(n)) = A251239(n-4) for n > 11.

Links

Reinhard Zumkeller, Table of n, a(n) for n = 1..10000

Example

.   n |     a(n)     | A151417(n) | A098551(a(n))
. ----+--------------+------------+--------------
.   1 |    2         |          1 |             2
.   2 |    3         |          1 |             3
.   3 |    4 = 2*2   |          1 |             4
.   4 |    5         |          5 |             9
.   5 |    6 = 2*3   |          1 |            10
.   6 |    7         |          5 |            15
.   7 |   10 = 2*5   |          1 |            16
.   8 |   11         |          6 |            22
.   9 |   13         |          1 |            23
.  10 |   17         |          7 |            30
.  11 |   18 = 2*3*3 |          1 |            31
.  12 |   19         |         12 |            43
.  13 |   23         |          8 |            51
.  14 |   29         |         10 |            61
.  15 |   31         |          1 |            62
.  16 |   37         |         17 |            79
.  17 |   41         |          8 |            87
.  18 |   43         |          1 |            88
.  19 |   47         |         13 |           101
.  20 |   53         |         13 |           114
.  21 |   59         |         13 |           127
.  22 |   61         |          5 |           132
.  23 |   67         |         10 |           142
.  24 |   71         |         11 |           153
.  25 |   73         |          5 |           158
The last column gives the position of a(n) in A098550.

Prog

(Haskell)
import Data.List (group)
a251595 n = a251595_list !! (n-1)
a251595_list = map head $ group a251416_list

Crossrefs

Cf. A098550, A098551, A251416, A251417, A251239.

Sequence in context: A001751 A191927 A116000 * A050725 A080571 A165805

Adjacent sequences: A251592 A251593 A251594 * A251596 A251597 A251598

Keyword

nonn

Author

Reinhard Zumkeller, Dec 05 2014

Status

approved