The On-Line Encyclopedia of Integer Sequences (OEIS)

Revision History for A036762

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

A036762

The integer values of x/d(x) in order of magnitude of x in A033950.
(history; published version)

#16 by Bruno Berselli at Tue Jul 05 03:28:49 EDT 2016

STATUS

reviewed

approved

#15 by Joerg Arndt at Tue Jul 05 03:08:32 EDT 2016

STATUS

proposed

reviewed

#14 by Michel Marcus at Tue Jul 05 00:09:59 EDT 2016

STATUS

editing

proposed

#13 by Michel Marcus at Tue Jul 05 00:09:53 EDT 2016

MAPLE

with(numtheory): A033950 := proc(n) option remember: local k: if(n=1)then return 1: else k:=procname(n-1)+1: do if(type(k/tau(k), integer))then return k: fi: k:=k+1: od: fi: end: A036762 := proc(n) return A033950(n)/tau(A033950(n)): end: seq(A036762(n), n=1..70); # _Nathaniel Johnston, _, May 04 2011

STATUS

proposed

editing

#12 by Michael De Vlieger at Mon Jul 04 17:38:13 EDT 2016

STATUS

editing

proposed

#11 by Michael De Vlieger at Mon Jul 04 17:38:07 EDT 2016

MATHEMATICA

Select[Table[n/DivisorSigma[0, n], {n, 708}], IntegerQ] (* Michael De Vlieger, Jul 04 2016 *)

STATUS

approved

editing

#10 by N. J. A. Sloane at Tue Oct 15 22:30:19 EDT 2013

AUTHOR

Labos E. (labos(AT)ana.sote.hu)

Labos Elemer

Discussion

Tue Oct 15

22:30

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

#9 by T. D. Noe at Fri Mar 16 17:44:29 EDT 2012

STATUS

editing

approved

#8 by T. D. Noe at Fri Mar 16 17:44:25 EDT 2012

NAME

The integer values of x/d[ (x ] ) in order of magnitude of x in A033950.

EXAMPLE

If n=63, then x=625 and d[ (x ]) = 5 divides x. The quotient is 125 = a[ (63 ]).

STATUS

approved

editing

#7 by Nathaniel Johnston at Wed May 04 12:55:55 EDT 2011

STATUS

proposed

approved