login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A083039 Number of divisors of n that are <= 3. 8

%I #59 Feb 23 2024 07:26:47

%S 1,2,2,2,1,3,1,2,2,2,1,3,1,2,2,2,1,3,1,2,2,2,1,3,1,2,2,2,1,3,1,2,2,2,

%T 1,3,1,2,2,2,1,3,1,2,2,2,1,3,1,2,2,2,1,3,1,2,2,2,1,3,1,2,2,2,1,3,1,2,

%U 2,2,1,3,1,2,2,2,1,3,1,2,2,2,1,3,1,2,2,2,1,3

%N Number of divisors of n that are <= 3.

%C Periodic of period 6. Parker vector of the wreath product of S_3 and S, the symmetric group of a countable set.

%H D. A. Gewurz and F. Merola, <a href="http://www.cs.uwaterloo.ca/journals/JIS/VOL6/Gewurz/gewurz5.html">Sequences realized as Parker vectors of oligomorphic permutation groups</a>, J. Integer Seq., 6 (2003), 03.1.6

%H M. D. Hirschhorn, J. A. Sellers, <a href="https://cs.uwaterloo.ca/journals/JIS/VOL11/Sellers/sellers44.html">Enumeration of unigraphical partitions</a>, JIS 11 (2008) 08.4.6

%H <a href="/index/Tu#2wis">Index entries for two-way infinite sequences</a>

%H <a href="/index/Rec#order_04">Index entries for linear recurrences with constant coefficients</a>, signature (-1, 0, 1, 1).

%F G.f.: x/(1-x) + x^2/(1-x^2) + x^3/(1-x^3).

%F a(n) = a(n-6) = a(-n).

%F a(n) = 11/6 - (1/2)*(-1)^n - (1/3)*cos(2*Pi*n/3) - (1/3)*3^(1/2)*sin(2*Pi*n/3). - _Richard Choulet_, Dec 12 2008

%F a(n) = Sum_{k=1..1} cos(n*(k - 1)/1*2*Pi)/1 + Sum_{k=1..2} cos(n*(k - 1)/2*2*Pi)/2 + Sum_{k=1..3} cos(n*(k - 1)/3*2*Pi)/3. - _Mats Granvik_, Sep 09 2012

%F a(n) = log_2(gcd(n,2) + gcd(n,6)). - _Gary Detlefs_, Feb 15 2014

%F a(n) = Sum_{d|n, d<=3} 1. - _Wesley Ivan Hurt_, Oct 30 2023

%e The divisors of 6 are 1, 2, 3 and 6. Of those divisors, 1, 2 and 3 are <= 3. That's three divisors, therefore, a(6) = 3. - _David A. Corneth_, Sep 30 2017

%t LinearRecurrence[{-1, 0, 1, 1},{1, 2, 2, 2},90] (* _Ray Chandler_, Aug 26 2015 *)

%o (PARI) a(n)=[3,1,2,2,2,1][n%6+1];

%Y Cf. A000005, A007310, A008588, A047228, A083040, A138553.

%K easy,nonn

%O 1,2

%A Daniele A. Gewurz (gewurz(AT)mat.uniroma1.it) and Francesca Merola (merola(AT)mat.uniroma1.it), May 06 2003

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified April 20 12:18 EDT 2024. Contains 371839 sequences. (Running on oeis4.)