login
A222482
Engel expansion of cos(1)/(1+cos(1)).
2
3, 20, 22, 40, 68, 248, 7163, 28663, 50059, 64574, 638169, 761733, 2537764, 2925739, 3363073, 4977902, 5646039, 57212854, 159650555, 219684539, 453524713, 459239955, 2002180165, 3234082460, 14965375439, 50298730245, 89316768769, 464076054936, 520232391320
OFFSET
1,1
COMMENTS
Cf. A006784 for definition of Engel expansion.
FORMULA
cos(1)/(1+cos(1)) = 1/(1+1/cos(1)) = 1/(1+sec(1)).
EXAMPLE
0.35077679479523758155811675...
MAPLE
Digits:= 1000:
b:= evalf(1/(1+1/cos(1))): engel:= (r, n)-> `if`(n=0 or r=0, NULL, [ceil(1/r), engel(r*ceil(1/r)-1, n-1)][]):
engel(b, 39);
CROSSREFS
Cf. A222480 (decimal expansion), A222481 (continued fraction), A049470 (cos(1)), A073448 (1/cos(1)).
Sequence in context: A333667 A375618 A169642 * A022129 A308721 A053748
KEYWORD
nonn
AUTHOR
Alois P. Heinz, Feb 21 2013
STATUS
approved