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 A380391 #20 Jan 25 2025 12:39:25
%S A380391 10,12,14,16,18,20,28,30,31,32,34,35,36,38,40,42,50,51,52,54,56,60,62,
%T A380391 64,68,70,71,72,73,74,75,76,78,80,84,85,90,91,92,93,94,95,96,97,98,
%U A380391 100,101,102,103,104,105,106,107,108,109,110,112,114,115,116,118,119,120
%N A380391 Numbers k such that A343750(k) != k.
%e A380391 k = 13: A343750(13) = 13, thus k = 13 is not in the sequence.
%e A380391 k = 14: A343750(14) = 41, thus k = 14 is a term.
%t A380391 q[k_] := Module[{perm = FromDigits /@ Permutations[IntegerDigits[k]], d}, d = DivisorSigma[0, perm]; Min@ perm[[Position[d, Min[d]] // Flatten]] != k]; Select[Range[120], q] (* _Amiram Eldar_, Jan 24 2025 *)
%Y A380391 Cf. A000005, A004719, A010785, A272215, A343750.
%K A380391 nonn,base
%O A380391 1,1
%A A380391 _Ctibor O. Zizka_, Jan 23 2025