7个数——12=1,24=2,36=3,48=4,60=5,72=6,84=7。——sin加法恒等式。
左边的数≠右边的数。左边的数可以相同。右边的数可以相同。左边的个数>右边的个数。左边的个数=右边的个数时,左边的第1个数<右边的第1个数——譬如
3: 2 组解
{1, 4} = {6}
{2, 3} = {7}
5: 1 组解
{1, 2, 7} = {4, 5}
6: 8 组解
{1, 4, 7} = {2, 3, 6}
{1, 7, 7} = {3, 4, 5}
{2, 6, 7} = {4, 4, 5}
{1, 1, 2, 7} = {5, 6}
{1, 1, 4, 4} = {6, 6}
{1, 2, 2, 3} = {4, 5}
{1, 2, 3, 4} = {6, 7}
{2, 2, 3, 3} = {7, 7}
9: 10 组解
{1, 1, 4, 4, 7} = {2, 3, 6, 6}
{1, 4, 4, 4, 5} = {2, 6, 6, 7}
{1, 1, 1, 2, 4, 7} = {5, 6, 6}
{1, 1, 1, 4, 4, 4} = {6, 6, 6}
{1, 1, 2, 3, 4, 4} = {6, 6, 7}
{1, 2, 2, 3, 3, 4} = {6, 7, 7}
{2, 2, 3, 3, 6} = {1, 4, 7, 7}
{2, 3, 3, 4, 5} = {1, 7, 7, 7}
{1, 2, 2, 2, 3, 3} = {4, 5, 7}
{2, 2, 2, 3, 3, 3} = {7, 7, 7}
10: 1 组解
{1, 1, 2, 2, 7, 7} = {4, 4, 5, 5}
11: 4 组解
{1, 1, 2, 7, 7, 7} = {3, 4, 4, 5, 5}
{1, 2, 2, 6, 7, 7} = {4, 4, 4, 5, 5}
{1, 1, 1, 2, 2, 7, 7} = {4, 5, 5, 6}
{1, 1, 2, 2, 2, 3, 7} = {4, 4, 5, 5}
12: 20 组解
{1, 1, 1, 4, 4, 4, 7} = {2, 3, 6, 6, 6}
{1, 1, 4, 4, 4, 4, 5} = {2, 6, 6, 6, 7}
{1, 1, 1, 1, 2, 4, 4, 7} = {5, 6, 6, 6}
{1, 1, 1, 1, 4, 4, 4, 4} = {6, 6, 6, 6}
{1, 1, 1, 2, 3, 4, 4, 4} = {6, 6, 6, 7}
{1, 1, 2, 2, 3, 3, 4, 4} = {6, 6, 7, 7}
{1, 2, 2, 2, 3, 3, 3, 4} = {6, 7, 7, 7}
{2, 2, 2, 3, 3, 3, 6} = {1, 4, 7, 7, 7}
{2, 2, 3, 3, 3, 4, 5} = {1, 7, 7, 7, 7}
{1, 2, 2, 2, 2, 3, 3, 3} = {4, 5, 7, 7}
{2, 2, 2, 2, 3, 3, 3, 3} = {7, 7, 7, 7}
{1, 1, 4, 4, 7, 7} = {2, 2, 3, 3, 6, 6}
{1, 1, 7, 7, 7, 7} = {3, 3, 4, 4, 5, 5}
{1, 2, 6, 7, 7, 7} = {3, 4, 4, 4, 5, 5}
{1, 1, 1, 2, 7, 7, 7} = {3, 4, 5, 5, 6}
{2, 2, 6, 6, 7, 7} = {4, 4, 4, 4, 5, 5}
{1, 2, 2, 2, 3, 6, 7} = {4, 4, 4, 5, 5}
{1, 1, 1, 1, 2, 2, 7, 7} = {5, 5, 6, 6}
{1, 1, 1, 2, 2, 2, 3, 7} = {4, 5, 5, 6}
{1, 1, 2, 2, 2, 2, 3, 3} = {4, 4, 5, 5}
15: 19 组解
{1, 1, 1, 1, 4, 4, 4, 4, 7} = {2, 3, 6, 6, 6, 6}
{1, 1, 1, 4, 4, 4, 4, 4, 5} = {2, 6, 6, 6, 6, 7}
{1, 1, 1, 1, 1, 2, 4, 4, 4, 7} = {5, 6, 6, 6, 6}
{1, 1, 1, 1, 1, 4, 4, 4, 4, 4} = {6, 6, 6, 6, 6}
{1, 1, 1, 1, 2, 3, 4, 4, 4, 4} = {6, 6, 6, 6, 7}
{1, 1, 1, 2, 2, 3, 3, 4, 4, 4} = {6, 6, 6, 7, 7}
{1, 1, 2, 2, 2, 3, 3, 3, 4, 4} = {6, 6, 7, 7, 7}
{1, 2, 2, 2, 2, 3, 3, 3, 3, 4} = {6, 7, 7, 7, 7}
{1, 1, 1, 4, 4, 4, 7, 7} = {2, 2, 3, 3, 6, 6, 6}
{1, 1, 1, 1, 1, 2, 2, 4, 7, 7} = {5, 5, 6, 6, 6}
{2, 2, 2, 3, 3, 3, 6, 6} = {1, 1, 4, 4, 7, 7, 7}
{2, 2, 2, 2, 3, 3, 3, 3, 6} = {1, 4, 7, 7, 7, 7}
{2, 2, 2, 3, 3, 3, 3, 4, 5} = {1, 7, 7, 7, 7, 7}
{1, 2, 2, 2, 2, 2, 3, 3, 3, 3} = {4, 5, 7, 7, 7}
{2, 2, 2, 2, 2, 3, 3, 3, 3, 3} = {7, 7, 7, 7, 7}
{1, 1, 2, 2, 2, 2, 2, 3, 3, 3} = {4, 4, 5, 5, 7}
{1, 1, 1, 2, 2, 2, 7, 7, 7} = {4, 4, 4, 5, 5, 5}
{2, 3, 3, 3, 4, 4, 5, 5} = {1, 1, 7, 7, 7, 7, 7}
{1, 4, 4, 4, 4, 4, 5, 5} = {2, 2, 6, 6, 6, 7, 7}
16: 4 组解
{1, 1, 1, 2, 2, 7, 7, 7, 7} = {3, 4, 4, 4, 5, 5, 5}
{1, 1, 2, 2, 2, 6, 7, 7, 7} = {4, 4, 4, 4, 5, 5, 5}
{1, 1, 1, 1, 2, 2, 2, 7, 7, 7} = {4, 4, 5, 5, 5, 6}
{1, 1, 1, 2, 2, 2, 2, 3, 7, 7} = {4, 4, 4, 5, 5, 5}
17: 8 组解
{1, 1, 1, 2, 7, 7, 7, 7, 7} = {3, 3, 4, 4, 4, 5, 5, 5}
{1, 1, 2, 2, 6, 7, 7, 7, 7} = {3, 4, 4, 4, 4, 5, 5, 5}
{1, 1, 1, 1, 2, 2, 7, 7, 7, 7} = {3, 4, 4, 5, 5, 5, 6}
{1, 2, 2, 2, 6, 6, 7, 7, 7} = {4, 4, 4, 4, 4, 5, 5, 5}
{1, 1, 2, 2, 2, 2, 3, 6, 7, 7} = {4, 4, 4, 4, 5, 5, 5}
{1, 1, 1, 1, 1, 2, 2, 2, 7, 7, 7} = {4, 5, 5, 5, 6, 6}
{1, 1, 1, 1, 2, 2, 2, 2, 3, 7, 7} = {4, 4, 5, 5, 5, 6}
{1, 1, 1, 2, 2, 2, 2, 2, 3, 3, 7} = {4, 4, 4, 5, 5, 5}
18: 32 组解
{1, 1, 1, 1, 1, 4, 4, 4, 4, 4, 7} = {2, 3, 6, 6, 6, 6, 6}
{1, 1, 1, 1, 4, 4, 4, 4, 4, 4, 5} = {2, 6, 6, 6, 6, 6, 7}
{1, 1, 1, 1, 1, 1, 2, 4, 4, 4, 4, 7} = {5, 6, 6, 6, 6, 6}
{1, 1, 1, 1, 1, 1, 4, 4, 4, 4, 4, 4} = {6, 6, 6, 6, 6, 6}
{1, 1, 1, 1, 1, 2, 3, 4, 4, 4, 4, 4} = {6, 6, 6, 6, 6, 7}
{1, 1, 1, 1, 2, 2, 3, 3, 4, 4, 4, 4} = {6, 6, 6, 6, 7, 7}
{1, 1, 1, 2, 2, 2, 3, 3, 3, 4, 4, 4} = {6, 6, 6, 7, 7, 7}
{1, 1, 2, 2, 2, 2, 3, 3, 3, 3, 4, 4} = {6, 6, 7, 7, 7, 7}
{1, 1, 1, 1, 4, 4, 4, 4, 7, 7} = {2, 2, 3, 3, 6, 6, 6, 6}
{1, 1, 1, 1, 1, 1, 2, 2, 4, 4, 7, 7} = {5, 5, 6, 6, 6, 6}
{1, 2, 2, 2, 2, 2, 3, 3, 3, 3, 3, 4} = {6, 7, 7, 7, 7, 7}
{1, 1, 4, 4, 4, 4, 4, 4, 5, 5} = {2, 2, 6, 6, 6, 6, 7, 7}
{2, 2, 2, 2, 3, 3, 3, 3, 6, 6} = {1, 1, 4, 4, 7, 7, 7, 7}
{2, 2, 2, 2, 2, 3, 3, 3, 3, 3, 6} = {1, 4, 7, 7, 7, 7, 7}
{2, 2, 2, 2, 3, 3, 3, 3, 3, 4, 5} = {1, 7, 7, 7, 7, 7, 7}
{1, 2, 2, 2, 2, 2, 2, 3, 3, 3, 3, 3} = {4, 5, 7, 7, 7, 7}
{2, 2, 2, 2, 2, 2, 3, 3, 3, 3, 3, 3} = {7, 7, 7, 7, 7, 7}
{1, 1, 2, 2, 2, 2, 2, 2, 3, 3, 3, 3} = {4, 4, 5, 5, 7, 7}
{2, 2, 3, 3, 3, 3, 4, 4, 5, 5} = {1, 1, 7, 7, 7, 7, 7, 7}
{1, 1, 1, 4, 4, 4, 7, 7, 7} = {2, 2, 2, 3, 3, 3, 6, 6, 6}
{1, 1, 1, 7, 7, 7, 7, 7, 7} = {3, 3, 3, 4, 4, 4, 5, 5, 5}
{1, 1, 2, 6, 7, 7, 7, 7, 7} = {3, 3, 4, 4, 4, 4, 5, 5, 5}
{1, 1, 1, 1, 2, 7, 7, 7, 7, 7} = {3, 3, 4, 4, 5, 5, 5, 6}
{1, 2, 2, 6, 6, 7, 7, 7, 7} = {3, 4, 4, 4, 4, 4, 5, 5, 5}
{1, 1, 1, 1, 1, 2, 2, 7, 7, 7, 7} = {3, 4, 5, 5, 5, 6, 6}
{2, 2, 2, 6, 6, 6, 7, 7, 7} = {4, 4, 4, 4, 4, 4, 5, 5, 5}
{1, 2, 2, 2, 2, 3, 6, 6, 7, 7} = {4, 4, 4, 4, 4, 5, 5, 5}
{1, 1, 2, 2, 2, 2, 2, 3, 3, 6, 7} = {4, 4, 4, 4, 5, 5, 5}
{1, 1, 1, 1, 1, 1, 2, 2, 2, 7, 7, 7} = {5, 5, 5, 6, 6, 6}
{1, 1, 1, 1, 1, 2, 2, 2, 2, 3, 7, 7} = {4, 5, 5, 5, 6, 6}
{1, 1, 1, 1, 2, 2, 2, 2, 2, 3, 3, 7} = {4, 4, 5, 5, 5, 6}
{1, 1, 1, 2, 2, 2, 2, 2, 2, 3, 3, 3} = {4, 4, 4, 5, 5, 5}
20: 1 组解
{1, 1, 1, 1, 2, 2, 2, 2, 7, 7, 7, 7} = {4, 4, 4, 4, 5, 5, 5, 5}
21: 30 组解
{1, 1, 1, 1, 1, 1, 4, 4, 4, 4, 4, 4, 7} = {2, 3, 6, 6, 6, 6, 6, 6}
{1, 1, 1, 1, 1, 4, 4, 4, 4, 4, 4, 4, 5} = {2, 6, 6, 6, 6, 6, 6, 7}
{1, 1, 1, 1, 1, 1, 1, 2, 4, 4, 4, 4, 4, 7} = {5, 6, 6, 6, 6, 6, 6}
{1, 1, 1, 1, 1, 1, 1, 4, 4, 4, 4, 4, 4, 4} = {6, 6, 6, 6, 6, 6, 6}
{1, 1, 1, 1, 1, 1, 2, 3, 4, 4, 4, 4, 4, 4} = {6, 6, 6, 6, 6, 6, 7}
{1, 1, 1, 1, 1, 2, 2, 3, 3, 4, 4, 4, 4, 4} = {6, 6, 6, 6, 6, 7, 7}
{1, 1, 1, 1, 2, 2, 2, 3, 3, 3, 4, 4, 4, 4} = {6, 6, 6, 6, 7, 7, 7}
{1, 1, 1, 2, 2, 2, 2, 3, 3, 3, 3, 4, 4, 4} = {6, 6, 6, 7, 7, 7, 7}
{1, 1, 1, 1, 1, 4, 4, 4, 4, 4, 7, 7} = {2, 2, 3, 3, 6, 6, 6, 6, 6}
{1, 1, 1, 1, 1, 1, 1, 2, 2, 4, 4, 4, 7, 7} = {5, 5, 6, 6, 6, 6, 6}
{1, 1, 2, 2, 2, 2, 2, 3, 3, 3, 3, 3, 4, 4} = {6, 6, 7, 7, 7, 7, 7}
{1, 1, 1, 4, 4, 4, 4, 4, 4, 4, 5, 5} = {2, 2, 6, 6, 6, 6, 6, 7, 7}
{1, 2, 2, 2, 2, 2, 2, 3, 3, 3, 3, 3, 3, 4} = {6, 7, 7, 7, 7, 7, 7}
{1, 1, 1, 1, 4, 4, 4, 4, 7, 7, 7} = {2, 2, 2, 3, 3, 3, 6, 6, 6, 6}
{1, 1, 1, 1, 1, 1, 1, 2, 2, 2, 4, 7, 7, 7} = {5, 5, 5, 6, 6, 6, 6}
{2, 2, 2, 2, 3, 3, 3, 3, 6, 6, 6} = {1, 1, 1, 4, 4, 4, 7, 7, 7, 7}
{2, 2, 2, 2, 2, 3, 3, 3, 3, 3, 6, 6} = {1, 1, 4, 4, 7, 7, 7, 7, 7}
{2, 2, 2, 2, 2, 2, 3, 3, 3, 3, 3, 3, 6} = {1, 4, 7, 7, 7, 7, 7, 7}
{2, 2, 2, 2, 2, 3, 3, 3, 3, 3, 3, 4, 5} = {1, 7, 7, 7, 7, 7, 7, 7}
{1, 2, 2, 2, 2, 2, 2, 2, 3, 3, 3, 3, 3, 3} = {4, 5, 7, 7, 7, 7, 7}
{2, 2, 2, 2, 2, 2, 2, 3, 3, 3, 3, 3, 3, 3} = {7, 7, 7, 7, 7, 7, 7}
{1, 1, 2, 2, 2, 2, 2, 2, 2, 3, 3, 3, 3, 3} = {4, 4, 5, 5, 7, 7, 7}
{2, 2, 2, 3, 3, 3, 3, 3, 4, 4, 5, 5} = {1, 1, 7, 7, 7, 7, 7, 7, 7}
{1, 1, 1, 2, 2, 2, 2, 2, 2, 2, 3, 3, 3, 3} = {4, 4, 4, 5, 5, 5, 7}
{1, 1, 1, 1, 2, 2, 2, 7, 7, 7, 7, 7} = {3, 4, 4, 4, 4, 5, 5, 5, 5}
{1, 1, 1, 2, 2, 2, 2, 6, 7, 7, 7, 7} = {4, 4, 4, 4, 4, 5, 5, 5, 5}
{1, 1, 1, 1, 1, 2, 2, 2, 2, 7, 7, 7, 7} = {4, 4, 4, 5, 5, 5, 5, 6}
{1, 1, 1, 1, 2, 2, 2, 2, 2, 3, 7, 7, 7} = {4, 4, 4, 4, 5, 5, 5, 5}
{2, 3, 3, 3, 3, 4, 4, 4, 5, 5, 5} = {1, 1, 1, 7, 7, 7, 7, 7, 7, 7}
{1, 4, 4, 4, 4, 4, 4, 4, 5, 5, 5} = {2, 2, 2, 6, 6, 6, 6, 7, 7, 7}
22: 8 组解
{1, 1, 1, 1, 2, 2, 7, 7, 7, 7, 7, 7} = {3, 3, 4, 4, 4, 4, 5, 5, 5, 5}
{1, 1, 1, 2, 2, 2, 6, 7, 7, 7, 7, 7} = {3, 4, 4, 4, 4, 4, 5, 5, 5, 5}
{1, 1, 1, 1, 1, 2, 2, 2, 7, 7, 7, 7, 7} = {3, 4, 4, 4, 5, 5, 5, 5, 6}
{1, 1, 2, 2, 2, 2, 6, 6, 7, 7, 7, 7} = {4, 4, 4, 4, 4, 4, 5, 5, 5, 5}
{1, 1, 1, 2, 2, 2, 2, 2, 3, 6, 7, 7, 7} = {4, 4, 4, 4, 4, 5, 5, 5, 5}
{1, 1, 1, 1, 1, 1, 2, 2, 2, 2, 7, 7, 7, 7} = {4, 4, 5, 5, 5, 5, 6, 6}
{1, 1, 1, 1, 1, 2, 2, 2, 2, 2, 3, 7, 7, 7} = {4, 4, 4, 5, 5, 5, 5, 6}
{1, 1, 1, 1, 2, 2, 2, 2, 2, 2, 3, 3, 7, 7} = {4, 4, 4, 4, 5, 5, 5, 5}
23: 12 组解
{1, 1, 1, 1, 2, 7, 7, 7, 7, 7, 7, 7} = {3, 3, 3, 4, 4, 4, 4, 5, 5, 5, 5}
{1, 1, 1, 2, 2, 6, 7, 7, 7, 7, 7, 7} = {3, 3, 4, 4, 4, 4, 4, 5, 5, 5, 5}
{1, 1, 1, 1, 1, 2, 2, 7, 7, 7, 7, 7, 7} = {3, 3, 4, 4, 4, 5, 5, 5, 5, 6}
{1, 1, 2, 2, 2, 6, 6, 7, 7, 7, 7, 7} = {3, 4, 4, 4, 4, 4, 4, 5, 5, 5, 5}
{1, 1, 1, 1, 1, 1, 2, 2, 2, 7, 7, 7, 7, 7} = {3, 4, 4, 5, 5, 5, 5, 6, 6}
{1, 2, 2, 2, 2, 6, 6, 6, 7, 7, 7, 7} = {4, 4, 4, 4, 4, 4, 4, 5, 5, 5, 5}
{1, 1, 2, 2, 2, 2, 2, 3, 6, 6, 7, 7, 7} = {4, 4, 4, 4, 4, 4, 5, 5, 5, 5}
{1, 1, 1, 2, 2, 2, 2, 2, 2, 3, 3, 6, 7, 7} = {4, 4, 4, 4, 4, 5, 5, 5, 5}
{1, 1, 1, 1, 1, 1, 1, 2, 2, 2, 2, 7, 7, 7, 7} = {4, 5, 5, 5, 5, 6, 6, 6}
{1, 1, 1, 1, 1, 1, 2, 2, 2, 2, 2, 3, 7, 7, 7} = {4, 4, 5, 5, 5, 5, 6, 6}
{1, 1, 1, 1, 1, 2, 2, 2, 2, 2, 2, 3, 3, 7, 7} = {4, 4, 4, 5, 5, 5, 5, 6}
{1, 1, 1, 1, 2, 2, 2, 2, 2, 2, 2, 3, 3, 3, 7} = {4, 4, 4, 4, 5, 5, 5, 5}
0:0, 1:0, 2:0, 3:2, 4:0, 5:1, 6:8, 7:0, 8:0, 9:10, 10:1, 11:4, 12:20, 13:0, 14:0, 15:19, 16:4, 17:8, 18:32, 19:0, 20:1, 21:30, 22:8, 23:12, 24:44, 25:1, 26:4, 27:42, 28:12, 29:16, 30:57, 31:4, 32:8, 33:54, 34:16, 35:21, 36:72, 37:8, 38:12, 39:66, 40:21,
41:28, 42:88, 43:12, 44:16, 45:79, 46:28, 47:36, 48:104, 49:16, 50:21, 51:94, 52:36, 53:44, 54:120, 55:21, 56:28, 57:110, 58:44, 59:52, 60:137, 61:28, 62:36, 63:126, 64:52, 65:61, 66:156, 67:36, 68:44, 69:142, 70:61, 71:72, 72:176, 73:44, 74:52,
75:159, 76:72, 77:84, 78:196, 79:52, 80:61, 81:178, 82:84, 83:96, 84:216, 85:61, 86:72, 87:198, 88:96, 89:108, 90:237, 91:72, 92:84, 93:218, 94:108, 95:121, 96:260, 97:84, 98:96, 99:238, 100:121, 101:136, 102:284, 103:96, 104:108, 105:259,
106:136, 107:152, 108:308, 109:108, 110:121, 111:282, 112:152, 113:168, 114:332, 115:121, 116:136, 117:306, 118:168, 119:184, 120:357, 121:136, 122:152, 123:330, 124:184, 125:201, 126:384, 127:152, 128:168, 129:354, 130:201, 131:220,
132:412, 133:168, 134:184, 135:379, 136:220, 137:240, 138:440, 139:184, 140:201, 141:406, 142:240, 143:260, 144:468, 145:201, 146:220, 147:434, 148:260, 149:280, 150:497,——这可是一个乱七八糟的数字串。——OEIS不会有。
- A[m_] := Module[{v = {8}, d =12}, Do[AppendTo[v, Last[v] + d]; d = d + Switch[Mod[i, 5], 0, 0, 1, 0, 2, 1, 3, 2, 4, -3]; If[Mod[i, 5] == 4, d += 4], {i, 0, m - 2}]; v[[m]]]
- B[m_] := Module[{v = {2}, d = 8}, Do[AppendTo[v, Last[v] + d]; d = d + Switch[Mod[i, 5], 0, 1, 1, 2, 2, 1, 3, 0, 4, -4]; If[Mod[i, 5] == 4, d += 4], {i, 0, m - 2}]; v[[m]]]
- S[m_] := Module[{v = {1}, d = 3}, Do[AppendTo[v, Last[v] + d]; d = d + Switch[Mod[i, 5], 0, 1, 1, 0, 2, 0, 3, 1, 4, -2]; If[Mod[i, 5] == 4, d += 4], {i, 0, m - 2}]; v[[m]]]
- DD[u_] := Module[{m, r}, m = Quotient[u + 3, 4]; r = Mod[u + 3, 4]; Switch[r, 0, S[m + 2], 1, S[m + 3], 2, S[m], 3, S[m + 1]]]
- f[n_] := Module[{k, r}, Which[n < 3, 0, n == 3, 2, n == 4, 0, n == 5, 1, n == 6, 8, True, r = Mod[n, 3]; k = Quotient[n, 3];
- Switch[r, 0, If[k == 1, 2, If[EvenQ[k], A[k/2], B[(k + 1)/2]]], 1, Which[k ≤ 2, 0, k == 3, 1, k == 4, 0, k == 5, 4, k == 6, 0, k ≥ 7,
- DD[2*k - 13]], 2, Which[k == 0, 0, k == 1, 1, k == 2, 0, k == 3, 4, k == 4, 0, k == 5, 8, k == 6, 1, k ≥ 7, DD[2*k - 12]]]]]
- Print[StringRiffle[Table[ToString[n] <> ":" <> ToString[f[n]], {n, 0, 1000}], ", "]]
复制代码 |