This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A177084 #25 Nov 17 2019 09:35:50 %S A177084 2,3,4,10,14,50,52,130,184,315,688,988,2528,6490,35456,396916,537088, %T A177084 538112,801376,1297312,8452096,8456192,35221184,53996590,134520832, %U A177084 222469702 %N A177084 Ceiling(n/3)-perfect numbers. %C A177084 For definition, see comment of A175522. %F A177084 {n: Sum_{d|n, d<n} A002264(2+d) = A002264(2+n)}. - _R. J. Mathar_, Dec 11 2010 %t A177084 aQ[n_] := DivisorSum[n, Ceiling[#/3] &, # < n &] == Ceiling[n/3]; Select[Range[10^6], aQ] (* _Amiram Eldar_, Jul 20 2019 *) %o A177084 (Sage) is_A177084 = lambda n: sum(ceil(d/3) for d in divisors(n)) == 2*ceil(n/3) # _D. S. McNeil_, Dec 10 2010 %Y A177084 Cf. A000396, A002264, A175522, A175807, A175853, A177050. %K A177084 nonn,more %O A177084 1,1 %A A177084 _Vladimir Shevelev_, Dec 09 2010 %E A177084 a(21)-a(26) from _Amiram Eldar_, Jul 20 2019