The On-Line Encyclopedia of Integer Sequences (OEIS)

Revision History for A318458 (Bold, blue-underlined text is an addition; faded, red-underlined text is a ~~deletion~~.)
Showing entries 1-10 | older changes

A318458

a(n) = n AND A001065(n), where AND is bitwise-and (A004198) & A001065 = sum of proper divisors.
(history; published version)

#23 by Charles R Greathouse IV at Thu Sep 08 08:46:22 EDT 2022

PROG

(MAGMAMagma) [SumOfDivisors(n)-BitwiseOr(n, SumOfDivisors(n)-n): n in [1..100]]; // Vincenzo Librandi, Aug 29 2018

Discussion

Thu Sep 08

08:46

OEIS Server: https://oeis.org/edit/global/2944

#22 by N. J. A. Sloane at Sun Sep 23 21:29:24 EDT 2018

STATUS

proposed

approved

#21 by Antti Karttunen at Thu Aug 30 00:31:26 EDT 2018

STATUS

editing

proposed

Discussion

Thu Aug 30

02:40

Altug Alkan: A318468 is also 'look' sequence and these graphs are really very interesting, at least to me. Best regards.

#20 by Antti Karttunen at Thu Aug 30 00:31:17 EDT 2018

COMMENTS

The peculiar look of the scatterplot is partly an artifact of the logarithmic scale. Compare also to the scatter plot scatterplot of A318468.

Discussion

Thu Aug 30

00:31

Antti Karttunen: Done.

#19 by Antti Karttunen at Thu Aug 30 00:30:56 EDT 2018

COMMENTS

The peculiar look of the scatter plot scatterplot is partly an artifact of the logarithmic scale. Compare also to the scatter plot of A318468.

STATUS

proposed

editing

#18 by Vincenzo Librandi at Wed Aug 29 01:17:13 EDT 2018

STATUS

editing

proposed

Discussion

Wed Aug 29

23:50

Jon E. Schoenfield: I'm accustomed to seeing "scatterplot" as one word.  (The spelling "scatterplot" beats "scatter plot" by about 3:1 in the OEIS.)

#17 by Vincenzo Librandi at Wed Aug 29 01:17:05 EDT 2018

MATHEMATICA

Table[BitAnd[n, DivisorSigma[1, n] - n], {n, 100}] (* Vincenzo Librandi, Aug 29 2018 *)

STATUS

proposed

editing

#16 by Vincenzo Librandi at Wed Aug 29 01:04:46 EDT 2018

STATUS

editing

proposed

#15 by Vincenzo Librandi at Wed Aug 29 01:00:29 EDT 2018

PROG

(MAGMA) [SumOfDivisors(n)-BitwiseOr(n, SumOfDivisors(n)-n): n in [1..100]]; // Vincenzo Librandi, Aug 29 2018

STATUS

proposed

editing

#14 by Antti Karttunen at Tue Aug 28 13:51:48 EDT 2018

STATUS

editing

proposed