[seqfan] Re: A324370 and A318256 related to Bernoulli fractions

[Peter Luschny]

Hi Paul,

> Are the sequences divisible by A050932?
Yes, at least in the A318256 variant,
Kellner/Sondow A324370 needs shifting.

> Il faut créer b1(n) = A318256(2n)
> b1(n) est vraisemblablement divisible par A006955.
Yes, it is.

I encourage you to enter these sequences!

Here another nice observation you might like:

a1 := n -> 2*denom(bernoulli(n,x)):
2,4,12,4,60,12,84,12,60,20,132,12,5460,...
a2 := n -> n*denom(bernoulli(n,x)) / mul(p, p in numtheory:-factorset(n)):
2,6,2,60,6,42,6,120,30,66,6,5460,210,30,...
a3 := n -> `if`(not type(a1(n)/a2(n),integer), n, NULL);
8,9,16,18,24,25,27,32,36,40,45,48,49,50,54,56,...

a3 is A046790 !

Cheers Peter