OFFSET
0,1
LINKS
Robert Israel, Table of n, a(n) for n = 0..10000
FORMULA
MAPLE
T:= select(t -> padic:-ratvaluep(t, 1)=2, [padic:-rootp(x^2+1/2, 3, 100)]): op([1, 1, 3], T); # Robert Israel, Aug 05 2019
PROG
(PARI) Vecrev(digits(truncate(-sqrt(-1/2+O(3^100))), 3))
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Seiichi Manyama, Aug 04 2019
STATUS
approved