A323411 - OEIS

A323411

Dirichlet inverse of A064664, the inverse permutation of EKG-sequence.

1, -2, -5, 1, -10, 16, -14, -4, 19, 31, -20, -21, -28, 43, 89, 4, -33, -98, -37, -42, 125, 61, -43, 48, 76, 85, -87, -58, -57, -409, -61, -1, 179, 100, 255, 203, -67, 112, 251, 98, -74, -573, -81, -85, -559, 130, -89, -100, 146, -370, 296, -107, -100, 548, 347, 145, 332, 172, -107, 846, -115, 184, -783, 3, 506, -825, -128

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

OFFSET

1,2

LINKS

Antti Karttunen, Table of n, a(n) for n = 1..32768

Index entries for sequences related to EKG sequence

PROG

(PARI)

up_to = 32768;

v064413 = readvec("b064413_upto65539_terms_only.txt"); \\ From precomputed file.

A064413(n) = v064413[n];

\\ Then its inverse A064664 is prepared:

m064664 = Map();

for(n=1, 65539, mapput(m064664, A064413(n), n));

A064664(n) = mapget(m064664, n);

DirInverse(v) = { my(u=vector(#v)); u[1] = (1/v[1]); for(n=2, #v, u[n] = -sumdiv(n, d, if(d<n, v[n/d]*u[d], 0))); (u) }; \\ Compute the Dirichlet inverse of the sequence given in input vector v.

v323411 = DirInverse(vector(up_to, n, A064664(n)));

A323411(n) = v323411[n];

CROSSREFS

Cf. A064413, A064664, A323412.

Cf. also A304526, A304527, A317843, A318664, A318665.

Sequence in context: A085358 A146104 A120235 * A089618 A207629 A207614

Adjacent sequences: A323408 A323409 A323410 * A323412 A323413 A323414

KEYWORD

sign

AUTHOR

Antti Karttunen, Jan 13 2019

STATUS

approved