# This b-file was computed by Antti Karttunen, 2019-12-28 # in GP/PARI CALCULATOR Version 2.9.4 (released) amd64 running linux (x86-64/GMP-6.1.2 kernel) 64-bit version, compiled: Dec 19 2017, gcc version 7.3.0 (Ubuntu 7.3.0-1ubuntu1), threading engine: pthread # with the following program: # # default(parisizemax,2^31); # v033833 = readvec("/home/antti/A/Schemuli/seqs/b033833_to.txt";) \\ Prepared with gawk ' { print $2 } ' < b033833.txt > b033833_to.txt # A033833(n) = v033833[n]; # A329900(n) = { my(m=1, pp=1); while(1, forprime(p=2, ,if(n%p, if(2==p, return(m), break), n /= p; pp = p)); m *= pp); (m); }; # A330685(n) = A329900(A033833(n)); # for(n=1,#v033833,write("b330685.txt", n, " ", A330685(n))); 1 1 2 4 3 8 4 6 5 16 6 12 7 9 8 24 9 18 10 48 11 20 12 36 13 96 14 27 15 40 16 72 17 30 18 54 19 80 20 144 21 60 22 160 23 45 24 288 25 120 26 90 27 240 28 180 29 84 30 480 31 200 32 360 33 168 34 960 35 270 36 400 37 126 38 720 39 336 40 540 41 800 42 252 43 1440 44 672 45 280 46 1080 47 504 48 1344 49 378 50 560 51 1008 52 420 53 2688 54 2400 55 756 56 1120 57 2016 58 840 59 1512 60 630 61 4032 62 1680 63 3024 64 1260 65 2268 66 3360 67 6048 68 2520 69 4536 70 6720 71 12096 72 1320 73 5040 74 13440 75 6336 76 3780 77 2640 78 10080 79 26880 80 1980 81 7560 82 5280 83 20160 84 8400 85 3960 86 15120 87 7056 88 10560 89 40320 90 19008 91 16800 92 7920 93 30240 94 14112 95 21120 96 5940 97 33600 98 10584 99 15840 100 28224 101 42240 102 11880 103 21168 104 31680 105 13200 106 50400 107 23760 108 11088 109 42336 110 63360 111 26400 112 47520 113 22176 114 126720 115 35640 116 52800 117 16632 118 95040 119 18720 120 44352 121 39600 122 49920 123 71280 124 14040 125 33264 126 190080 127 37440 128 79200 129 36960 130 142560 131 28080 132 66528 133 380160 134 74880 135 158400 136 31200 137 73920 138 285120 139 56160 140 26208 141 149760 142 42120 143 99792 144 62400 145 19656 146 112320 147 52416 148 46800 149 110880 150 84240 151 124800 152 39312 153 224640 154 104832 155 93600 156 43680 157 168480 158 249600 159 78624 160 449280 161 32760 162 126360 163 209664 164 187200 165 87360 166 336960 167 157248 168 73440 169 65520 170 374400 171 117936 172 174720 173 314496 174 280800 175 146880 176 131040 177 748800 178 235872 179 349440 180 98280 181 628992 182 561600 183 262080 184 471744 185 220320 186 196560 187 102816 188 1123200 189 353808 190 524160 191 943488 192 440640 193 393120 194 707616 195 1048320 196 294840 197 1886976 198 154224 199 228480 200 881280 201 786240 202 1415232 203 367200 204 2096640 205 171360 206 589680 207 308448 208 456960 209 1572480 210 734400 211 655200 212 4193280 213 342720 214 1179360 215 616896 216 3144960 217 257040 218 1468800 219 1310400 220 685440 221 2358720 222 1233792 223 6289920 224 514080 225 2620800 226 925344 227 1370880 228 4717440 229 2467584 230 2203200 231 1965600 232 12579840 233 1028160 234 1850688 235 2741760