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 A244344 #16 Jan 22 2022 00:08:12 %S A244344 582,1164,1746,2328,3492,4656,5238,6410,6984,9312,10476,12820,13968, %T A244344 15714,18624,20952,25640,27936,31428,32050,33838,37248,41904,47142, %U A244344 51280,55872,56454,62856,64100,67676,74496,83808,94284,102560,111744,112908,125712,128200 %N A244344 Numbers such that the largest prime factor equals the sum of the 4th power of the other prime factors. %C A244344 Observation: it seems that the prime divisors of a majority of numbers n are of the form {2, p, q} with q = 2^4 + p^4, but there exists more rarely odd numbers with more prime divisors (example from Michel Marcus: 3955413 = 3*7*11*17123). %H A244344 Amiram Eldar, <a href="/A244344/b244344.txt">Table of n, a(n) for n = 1..1500</a> %e A244344 582 is in the sequence because the prime divisors of 582 are 2, 3 and 97 => 2^4 + 3^4 = 97. %t A244344 fpdQ[n_]:=Module[{f=Transpose[FactorInteger[n]][[1]]},Max[f]-Total[Most[f]^4]==0];Union[Select[Range[2,5*10^5],fpdQ]] %Y A244344 Cf. A094479, A193411, A185077. %K A244344 nonn %O A244344 1,1 %A A244344 _Michel Lagneau_, Jun 26 2014