[go: up one dir, main page]

login
Revision History for A184627 (Bold, blue-underlined text is an addition; faded, red-underlined text is a deletion.)

Showing all changes.
floor((n-h)*s+h), where s=(3+sqrt(3))/2 and h=1/4; complement of A184626.
(history; published version)
#4 by Russ Cox at Fri Mar 30 18:57:16 EDT 2012
AUTHOR

_Clark Kimberling (ck6(AT)evansville.edu), _, Jan 18 2011

Discussion
Fri Mar 30
18:57
OEIS Server: https://oeis.org/edit/global/285
#3 by T. D. Noe at Tue Jan 18 12:09:57 EST 2011
STATUS

proposed

approved

#2 by Clark Kimberling at Tue Jan 18 11:29:48 EST 2011
NAME

allocated for Clark Kimberlingfloor((n-h)*s+h), where s=(3+sqrt(3))/2 and h=1/4; complement of A184626.

DATA

2, 4, 6, 9, 11, 13, 16, 18, 20, 23, 25, 28, 30, 32, 35, 37, 39, 42, 44, 46, 49, 51, 54, 56, 58, 61, 63, 65, 68, 70, 73, 75, 77, 80, 82, 84, 87, 89, 91, 94, 96, 99, 101, 103, 106, 108, 110, 113, 115, 117, 120, 122, 125, 127, 129, 132, 134, 136, 139, 141, 143, 146, 148, 151, 153, 155, 158, 160, 162, 165, 167, 170, 172, 174, 177, 179, 181, 184, 186, 188, 191, 193, 196, 198, 200, 203, 205, 207, 210, 212, 214, 217, 219, 222, 224, 226, 229, 231, 233, 236, 238, 240, 243, 245, 248, 250, 252, 255, 257, 259, 262, 264, 267, 269, 271, 274, 276, 278, 281, 283

OFFSET

1,1

FORMULA

a(n)=floor((n-h)*s+h), where s=(3+sqrt(3))/2 and h=1/4.

MATHEMATICA

r=3^(1/2); h=1/4; s=r/(r-1);

Table[Floor[n*r+h], {n, 1, 120}] (* A184626 *)

Table[Floor[n*s+h-h*s], {n, 1, 120}] (* A184627 *)

CROSSREFS
KEYWORD

allocated

nonn

AUTHOR

Clark Kimberling (ck6(AT)evansville.edu), Jan 18 2011

STATUS

approved

proposed

#1 by Clark Kimberling at Tue Jan 18 10:31:34 EST 2011
NAME

allocated for Clark Kimberling

KEYWORD

allocated

STATUS

approved