The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A281533 Numbers such that A279967(n) = 0. 3
 17, 23, 47, 57, 93, 107, 155, 173, 233, 255, 327, 353, 437, 467, 563, 597, 677, 705, 743, 863, 905, 1037, 1083, 1187, 1227, 1277, 1433, 1487, 1607, 1655, 1713, 1893, 1955, 2027, 2095, 2147, 2213, 2293, 2357, 2417, 2467, 2487, 2503, 2703, 2719, 2777, 2861, 2993, 3005, 3083, 3251 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,1 COMMENTS This sequence is neither a subset nor a superset of sequence A278436 since 155 and 817 are in one, but not the other, respectively. LINKS EXAMPLE Number 155 = 5*31, equivalent to array position (17, 2), is in the sequence since all prior numbers in column 1 are even as are those in column 2, except 9 which is not a factor of 155. MATHEMATICA (* support functions are in A279967*) a281533[k_] := Module[{ut=upperTriangle[k], ms=Table[" ", {i, 1, k}, {j, 1, k}], h, pos, val, seqL={}}, ms[[1, 1]]=1; For[h=2, h<=Length[ut], h++, pos=ut[[h]]; val=Apply[Plus, Select[Map[ms[[Apply[Sequence, #]]]&, priorPos[pos]], #!=0 && Mod[seqPos[pos], #]==0&]]; If[val==0, AppendTo[seqL, val]]; ms[[Apply[Sequence, pos]]]=val]; seqL] a281533[81] (* data *) CROSSREFS Cf. A278436, A279966, A279967. Sequence in context: A086532 A159044 A267984 * A278436 A126329 A130098 Adjacent sequences:  A281530 A281531 A281532 * A281534 A281535 A281536 KEYWORD nonn AUTHOR Hartmut F. W. Hoft, Jan 23 2017 STATUS approved

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

Last modified April 8 05:55 EDT 2020. Contains 333312 sequences. (Running on oeis4.)