A138709 -id:A138709

Search: a138709 -id:a138709

Displaying 1-4 of 4 results found.

page 1

A138711

n-th run has length n-th positive triangular number, with digits 0 and 1 only, starting with 1.

+10
2

1, 0, 0, 0, 1, 1, 1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,1

LINKS

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

EXAMPLE

.n ..... Run ............................... Length

.1 ..... 1 ................................. 1

.2 ..... 0,0,0 ............................. 3

.3 ..... 1,1,1,1,1,1........................ 6

.4 ..... 0,0,0,0,0,0,0,0,0,0 ............... 10

.5 ..... 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1 ..... 15

MATHEMATICA

Flatten[Table[Join[PadRight[{}, (n(n+1))/2, 1], PadRight[{}, ((n+1)(n+2))/2, 0]], {n, 1, 7, 2}]] (* Harvey P. Dale, Dec 11 2011 *)

CROSSREFS

Cf. A000217, A057211, A138149, A138709.

KEYWORD

easy,nonn

AUTHOR

Omar E. Pol, Mar 29 2008

STATUS

approved

A138719

Concatenation of k digits 1, k digits 0 and k digits 1, where k is the n-th positive Fibonacci number.

+10
1

101, 101, 110011, 111000111, 111110000011111, 111111110000000011111111, 111111111111100000000000001111111111111, 111111111111111111111000000000000000000000111111111111111111111

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,1

LINKS

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

CROSSREFS

Cf. A000045, A134803, A138709, A138722.

KEYWORD

base,easy,nonn

AUTHOR

Omar E. Pol, Mar 29 2008

STATUS

approved

A138885

n-th run has length n-th nonprime number, with digits 0 and 1 only, starting with 1.

+10
1

1, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,1

LINKS

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

EXAMPLE

.n ..... Run ................... Length

.1 ..... 1 ..................... 1

.2 ..... 0,0,0,0 ............... 4

.3 ..... 1,1,1,1,1,1 ........... 6

.4 ..... 0,0,0,0,0,0,0,0 ....... 8

.5 ..... 1,1,1,1,1,1,1,1,1 ..... 9

MATHEMATICA

Join[{1}, {PadRight[{}, #[[1]], 0], PadRight[{}, #[[2]], 1]}&/@Partition[Select[Range[ 20], CompositeQ], 2]]//Flatten (* Harvey P. Dale, May 26 2023 *)

CROSSREFS

Nonprime numbers: A018252. Cf. A057211, A138149, A138150, A138709, A138710, A138711, A138712, A138886.

KEYWORD

easy,nonn

AUTHOR

Omar E. Pol, Apr 06 2008

STATUS

approved

A138886

n-th run has length n-th nonprime number A018252, with digits 0 and 1 only, starting with 0.

+10
1

0, 1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,1

COMMENTS

Also the n-th run has length A141468, with digits 0 and 1 only, starting with 1.

LINKS

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

EXAMPLE

.n ..... Run ................... Length

.1 ..... 0 ..................... 1

.2 ..... 1,1,1,1 ............... 4

.3 ..... 0,0,0,0,0,0 ........... 6

.4 ..... 1,1,1,1,1,1,1,1 ....... 8

.5 ..... 0,0,0,0,0,0,0,0,0 ..... 9

CROSSREFS

Cf. A057211, A138149, A138150, A138709, A138710, A138711, A138712, A138885.

KEYWORD

easy,nonn

AUTHOR

Omar E. Pol, Apr 06 2008

STATUS

approved

page 1

Search completed in 0.008 seconds