A289544 Pandigital numbers (each digit 0-9 used exactly once) where the first 3 digits plus the next 3 digits equals the last 4 digits.
2467891035, 2497861035, 2647891053, 2697841053, 2847691053, 2867491035, 2897461035, 2897641053, 3247651089, 3257641089, 3427561098, 3467521098, 3478591206, 3498571206, 3527461098, 3567421098, 3578491206, 3598471206, 3647251089, 3657241089, 4236751098, 4256731098
Offset: 1
Examples
2467891035 is in the sequence as 246|789|1035: 246 + 789 = 1035 and each digit (0-9) is used exactly once.
Links
- Jonathan Schwartz, Table of n, a(n) for n = 1..96
- David A. Corneth, PARI program
Programs
-
Mathematica
FromDigits /@ Select[Permutations[Range[0, 9]], And[#1 + #2 == #3, #3 >= 1000] & @@ Map[FromDigits, {Take[#, 3], #[[4 ;; 6]], Take[#, -4]}] &] (* Michael De Vlieger, Aug 02 2018 *)
-
Python
from itertools import permutations def t2i(t): return int("".join(map(str, t))) alst = [t2i(p) for p in permutations(range(10)) if p[6] != 0 and t2i(p[:3]) + t2i(p[3:6]) == t2i(p[6:])] print(alst) # Michael S. Branicky, May 30 2022
Comments