login

Revision History for A064273

(Bold, blue-underlined text is an addition; faded, red-underlined text is a deletion.)

Showing entries 1-10 | older changes
Permutation of nonnegative integers: a(n) = A013928(A019565(n)).
(history; published version)
#31 by Susanna Cuyler at Wed Jul 04 20:22:36 EDT 2018
STATUS

proposed

approved

#30 by Jon E. Schoenfield at Wed Jul 04 17:17:51 EDT 2018
STATUS

editing

proposed

#29 by Jon E. Schoenfield at Wed Jul 04 17:17:49 EDT 2018
COMMENTS

Sequence is obtained when the range of A019565 is compacted so that it becomes surjective, thus the logarithmic scatter plots look very similar. (Same applies to A246353). ) Compare also to the plot of A005940.

PROG

A019565(n) = {factorback(Mat(vector(if(n, #n=vecextract(binary(n), "-1..1")), j, [prime(j), n[j]])~))}; \\ This function from __M. F. Hasler_

STATUS

approved

editing

#28 by Peter Luschny at Fri Jun 29 02:20:49 EDT 2018
STATUS

reviewed

approved

#27 by Michel Marcus at Fri Jun 29 02:18:56 EDT 2018
STATUS

proposed

reviewed

#26 by Jon E. Schoenfield at Thu Jun 28 22:44:50 EDT 2018
STATUS

editing

proposed

#25 by Jon E. Schoenfield at Thu Jun 28 22:44:47 EDT 2018
PROG

for(n=0, 478, write("b064273.txt", n, " ", A064273(n))); \\ From __Antti Karttunen_, Aug 23 2014

STATUS

approved

editing

#24 by N. J. A. Sloane at Sun Aug 24 17:40:37 EDT 2014
STATUS

proposed

approved

#23 by Antti Karttunen at Sun Aug 24 00:37:08 EDT 2014
STATUS

editing

proposed

#22 by Antti Karttunen at Sun Aug 24 00:36:43 EDT 2014
COMMENTS

Sequence is obtained from A019565 when its the range of A019565 is compressed compacted so that it becomes surjective, thus the logaritchmic logarithmic scatter plots look very similar. (Same applies to A246353). Compare also to the plot of A005940.

STATUS

proposed

editing