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!)
A034168 Disjoint discriminants (one form per genus) of type 2 (doubled). 3

%I #23 Jul 21 2022 12:20:21

%S 2,6,10,22,30,42,58,70,78,102,130,190,210,330,462

%N Disjoint discriminants (one form per genus) of type 2 (doubled).

%D J. M. Borwein and P. B. Borwein, Pi and the AGM, page 293.

%D L. E. Dickson, Introduction to the theory of numbers, Dover, NY, 1929.

%H J. M. Borwein, <a href="https://www.carma.newcastle.edu.au/jon/OEIStalk.pdf">Adventures with the OEIS: Five sequences Tony may like</a>, Guttman 70th [Birthday] Meeting, 2015, revised May 2016.

%H J. M. Borwein, <a href="/A060997/a060997.pdf">Adventures with the OEIS: Five sequences Tony may like</a>, Guttman 70th [Birthday] Meeting, 2015, revised May 2016. [Cached copy, with permission]

%H J. Borwein and K.-K. S. Choi, <a href="https://projecteuclid.org/euclid.em/1046889597">On the representations of xy+yz+zx</a>, Experimental Mathematics, 9 (2000), 153-158.

%H Experimental Mathematics, <a href="http://www.emis.de/journals/EM/">Home Page</a>

%F Intersection of A005843 and A139826. - _Andrew Howroyd_, Jun 09 2018

%t noSol = {};

%t Do[lim = Ceiling[(n-2)/3]; found = False; Do[If[n > a*b && Mod[n - a*b, a+b] == 0 && Quotient[n - a*b, a+b] > b, found = True; Break[]], {a, 1, lim-1}, {b, a+1, lim}]; If[!found, AppendTo[noSol, n]], {n, 1000}];

%t Select[noSol, EvenQ[#] && SquareFreeQ[#]&] (* _Jean-François Alcover_, Jul 21 2022, after _T. D. Noe_ in A000926 *)

%o (PARI) ok(n)={n%4==2 && issquarefree(n) && !select(t->t<>2, quadclassunit(-4*n).cyc)} \\ _Andrew Howroyd_, Jun 09 2018

%Y Cf. A000926, A005843, A034169, A055745, A139826. Subsequence of A025052.

%K nonn,fini,full,nice

%O 1,1

%A Jonathan Borwein (jborwein(AT)cecm.sfu.ca), choi(AT)cecm.sfu.ca (Stephen Choi)

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 March 29 03:51 EDT 2024. Contains 371264 sequences. (Running on oeis4.)