cp's OEIS Frontend

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.

Showing 1-2 of 2 results.

A144719 Semiprimes whose factors are decimal palindromes when concatenated, omitting multiples of primes less than 11.

Original entry on oeis.org

121, 403, 1207, 1243, 1703, 2321, 2701, 3421, 3503, 3629, 4043, 4061, 4069, 4121, 4247, 4303, 4309, 4607, 5603, 6109, 6401, 7663, 8203, 8921, 9329, 9703, 9707, 9943, 10001, 10021, 10187, 10201, 12223, 12283, 12709, 13129, 13801, 14921, 15007
Offset: 1

Views

Author

Reikku Kulon, Sep 19 2008

Keywords

Comments

Presumed infinite.

Examples

			121 = 11 * 11; 1111 is a palindrome.
4309 = 139 * 31; 13931 is a palindrome.
		

Crossrefs

Programs

  • Mathematica
    spdpQ[n_]:=Module[{fi=FactorInteger[n][[All,1]]},PrimeOmega[n]==2&&Min[ fi]>10 &&AnyTrue[{FromDigits[Flatten[IntegerDigits/@fi]],FromDigits[ Flatten[ IntegerDigits/@Reverse[fi]]]},PalindromeQ]]; Select[Range[ 15100],spdpQ] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Sep 12 2020 *)

A144694 Initial terms from the linear congruential pseudorandom number generator defined by the recurrence a(n + 1) = a(n) * 7202161 + 1234567 (modulo 277945762500) with a(0) = 0.

Original entry on oeis.org

0, 1234567, 275232896354, 254512755561, 100356676888, 52443177035, 94402644702, 182170448089, 160360104896, 160787264823, 53709154570, 135639047837, 234571597824, 250315882231, 144609285758, 175142970105, 222009343972, 112485333059, 70607625066, 140050302193
Offset: 0

Views

Author

Reikku Kulon, Sep 19 2008

Keywords

Comments

Referred to as ba3koxobe-cajedeja for convenience; this name is a simple representation of the modulus and multiplier in base 105.
The modulus 277945762500 is the fourth hyperprimorial, 2^2 * 3^3 * 5^5 * 7^7 (A076265).
The multiplier 7202161 is the semiprime 37 * 194653, located by exhaustive search of the integers allowing 64-bit computation. The maximum possible result of a(n) * 7202161 is 277945762499 * 7202161 = 2001810130785560339, a 61-bit value.
The addend 1234567 (A116935) is the memorable palindromic semiprime 127 * 9721, chosen for that property alone. Its value is not important, except that it must be nonzero and cannot be a multiple of 2, 3, 5, or 7.
Conversion of a(n) to 32 bits produces a sequence that passes the strongest empirical tests of randomness immediately available, including every test in the TestU01 Rabbit battery and every test in the Smallcrush battery except the birthday spacings test. Combining this output by XOR with the output of another generator, such as a Xorshift generator as described by Marsaglia, overcomes the observed flaws and allows the birthday spacings test to be passed as well.
Other multipliers identified for this modulus, believed to be marginally weaker (with minimal testing), in presumed order of decreasing strength, are 13683601, 19701361, 8692321, 11634841, 20627461, 3108421, 10419781, 3999241 and 9505021. All except 8692321 are semiprimes.
Reasons for the superiority of this modulus and these multipliers are guessed at, but remain to be determined.

Crossrefs

Programs

  • Maple
    a:= proc(n) option remember; `if`(n=0, 0,
          irem(7202161 *a(n-1) +1234567, 277945762500))
        end:
    seq(a(n), n=0..30);  # Alois P. Heinz, Jun 10 2014
  • Mathematica
    NestList[Mod[#*7202161 + 1234567, 277945762500] &, 0, 20] (* Paolo Xausa, Nov 13 2024 *)
  • PARI
    \\ See links.

Formula

a(n+1) = a(n) * 7202161 + c (modulo 277945762500) where c > 0 and gcd(c,277945762500) = 1, with a(0) a nonnegative integer.
Showing 1-2 of 2 results.