Discussion about math, puzzles, games and fun.   Useful symbols: ÷ × ½ √ ∞ ≠ ≤ ≥ ≈ ⇒ ± ∈ Δ θ ∴ ∑ ∫ • π ƒ -¹ ² ³ °

You are not logged in.

• Index
•  » This is Cool
•  » My New Residue Prime Number (Unless someone else found it)

## #1 2013-06-16 12:48:47

Stangerzv
Full Member

Offline

### My New Residue Prime Number (Unless someone else found it)

Consider this equation.

Where Ps is the resulting Prime and n & p are integers.

If t=1, this equation reduces to the known prime (Refer OEIS) as follows:

Selecting the values of t and n for odd/prime Ps, yields the  following example

Which is a prime of approximately 14,700 Digits.

By the way, does anyone know how to calculate how many digits this number is on Mathematica?

Last edited by Stangerzv (2013-06-16 13:02:15)

## #2 2013-06-16 13:39:46

bobbym

Offline

### Re: My New Residue Prime Number (Unless someone else found it)

It has 14734 digits.

In Mathematica, this is simplest.

N[8^16315  - 7^16315 - 6^16315 - 5^16315 -4^16315 - 3^16315 - 2^16315, 20]

In mathematics, you don't understand things. You just get used to them.
Some cause happiness wherever they go; others, whenever they go.
If you can not overcome with talent...overcome with effort.

## #3 2013-06-16 13:45:06

phrontister
Real Member

Offline

### Re: My New Residue Prime Number (Unless someone else found it)

And PrimeQ[8^16315 - 7^16315 - 6^16315 - 5^16315 - 4^16315 - 3^16315 - 2^16315] agrees that the result is prime.

"The good news about computers is that they do what you tell them to do. The bad news is that they do what you tell them to do." - Ted Nelson

## #4 2013-06-16 13:54:35

Stangerzv
Full Member

Offline

### Re: My New Residue Prime Number (Unless someone else found it)

Thanks bobbym and phrontister..alpertron won't work due to out of range.

## #5 2013-06-16 13:59:56

bobbym

Offline

### Re: My New Residue Prime Number (Unless someone else found it)

Use this in Mathematica for a proof of the primality of a number:

Needs["PrimalityProving`"]

ProvablePrimeQ[
8^16315  - 7^16315 - 6^16315 - 5^16315 - 4^16315 - 3^16315 - 2^16315]

But it may take a long time!

In mathematics, you don't understand things. You just get used to them.
Some cause happiness wherever they go; others, whenever they go.
If you can not overcome with talent...overcome with effort.

## #6 2013-06-16 14:12:16

Stangerzv
Full Member

Offline

### Re: My New Residue Prime Number (Unless someone else found it)

Thanks bobbym..I would run on my computer.

## #7 2013-06-16 14:14:27

bobbym

Offline

### Re: My New Residue Prime Number (Unless someone else found it)

I turned it off after around 10 minutes. May take hours or days...

In mathematics, you don't understand things. You just get used to them.
Some cause happiness wherever they go; others, whenever they go.
If you can not overcome with talent...overcome with effort.

## #8 2013-06-16 18:51:05

phrontister
Real Member

Offline

### Re: My New Residue Prime Number (Unless someone else found it)

#### bobbym wrote:

In Mathematica, this is simplest.

N[8^16315  - 7^16315 - 6^16315 - 5^16315 -4^16315 - 3^16315 - 2^16315, 20]

This one seems good too:

IntegerLength[8^16315 - 7^16315 - 6^16315 - 5^16315 - 4^16315 - 3^16315 - 2^16315]

"The good news about computers is that they do what you tell them to do. The bad news is that they do what you tell them to do." - Ted Nelson

## #9 2013-06-16 18:54:03

bobbym

Offline

### Re: My New Residue Prime Number (Unless someone else found it)

8^16315.- 7^16315 - 6^16315 - 5^16315 - 4^16315 - 3^16315 - 2^16315

In mathematics, you don't understand things. You just get used to them.
Some cause happiness wherever they go; others, whenever they go.
If you can not overcome with talent...overcome with effort.

## #10 2013-06-16 19:01:00

phrontister
Real Member

Offline

### Re: My New Residue Prime Number (Unless someone else found it)

Yes...works too. What does the dot after the 5 do?

"The good news about computers is that they do what you tell them to do. The bad news is that they do what you tell them to do." - Ted Nelson

## #11 2013-06-16 19:02:38

bobbym

Offline

### Re: My New Residue Prime Number (Unless someone else found it)

It tells M that number is done in floating point. This is much faster then exact arithmetic. Once M does one bit of an expression in floating point, it does the rest in it too.

In mathematics, you don't understand things. You just get used to them.
Some cause happiness wherever they go; others, whenever they go.
If you can not overcome with talent...overcome with effort.

## #12 2013-06-16 19:17:37

phrontister
Real Member

Offline

### Re: My New Residue Prime Number (Unless someone else found it)

Oh, I see. Interesting option.

I recently installed a freeware Add-In into Excel that enables multi-precision floating point calcs up to 32760 significant digits. It was fine for what I was working on but it has some whiskers too, so I've disabled it.

"The good news about computers is that they do what you tell them to do. The bad news is that they do what you tell them to do." - Ted Nelson

## #13 2013-06-16 19:23:14

bobbym

Offline

### Re: My New Residue Prime Number (Unless someone else found it)

That is interesting. I have been playing a little with geogebra's spreadsheet. If only they would interface geo with maxima a little better.

In mathematics, you don't understand things. You just get used to them.
Some cause happiness wherever they go; others, whenever they go.
If you can not overcome with talent...overcome with effort.

## #14 2013-06-16 19:29:38

Stangerzv
Full Member

Offline

### Re: My New Residue Prime Number (Unless someone else found it)

It seems that once the value of p becoming larger, you can simply taking log on the first term to get the digits. So, the number of digits=16315log8=14733.91.

## #15 2013-06-16 19:32:55

bobbym

Offline

### Re: My New Residue Prime Number (Unless someone else found it)

Yep, that will will give an approximation ala Landau Notation.

But why settle for an approximation when you can get the exact answer?

In mathematics, you don't understand things. You just get used to them.
Some cause happiness wherever they go; others, whenever they go.
If you can not overcome with talent...overcome with effort.

## #16 2013-06-16 19:51:18

Stangerzv
Full Member

Offline

### Re: My New Residue Prime Number (Unless someone else found it)

I was not sure, until you gave me the exact value, which is more less the value by taking log on the first term.

## #17 2013-06-16 20:05:20

bobbym

Offline

### Re: My New Residue Prime Number (Unless someone else found it)

Mathematically, it is correct to approximate it using just the first term when n is large.

In mathematics, you don't understand things. You just get used to them.
Some cause happiness wherever they go; others, whenever they go.
If you can not overcome with talent...overcome with effort.

## #18 2013-06-16 21:16:35

phrontister
Real Member

Offline

### Re: My New Residue Prime Number (Unless someone else found it)

#### bobbym wrote:

Use this in Mathematica for a proof of the primality of a number:

Needs["PrimalityProving`"]

ProvablePrimeQ[
8^16315  - 7^16315 - 6^16315 - 5^16315 - 4^16315 - 3^16315 - 2^16315]

But it may take a long time!

I didn't know that, so I looked it up and found this help file: PrimalityProving/tutorial/PrimalityProving

Near the end of the article  it says "PrimeQ will be, in general, several orders of magnitude faster than ProvablePrimeQ." My PrimeQ test on this number took just under 6 minutes...but of course it doesn't give the mathematical proof (which I can't follow, anyway, having tested the function on a smaller prime and finding the proof too advanced for me).

"The good news about computers is that they do what you tell them to do. The bad news is that they do what you tell them to do." - Ted Nelson

## #19 2013-06-16 21:36:57

bobbym

Offline

### Re: My New Residue Prime Number (Unless someone else found it)

Since the WZ algorithm they now use certificates to prove when an algorithm gave the right answer. I do not understand it either.

In mathematics, you don't understand things. You just get used to them.
Some cause happiness wherever they go; others, whenever they go.
If you can not overcome with talent...overcome with effort.

## #20 2013-06-17 19:25:37

phrontister
Real Member

Offline

### Re: My New Residue Prime Number (Unless someone else found it)

#### phrontister wrote:

IntegerLength[8^16315 - 7^16315 - 6^16315 - 5^16315 - 4^16315 - 3^16315 - 2^16315]

This form helped in another program of mine where I needed to plug the number of digits into another calculation, which I did via len=IntegerLength[a].

I guess that could also be done with other methods, but the one above seemed to be a simple option.

"The good news about computers is that they do what you tell them to do. The bad news is that they do what you tell them to do." - Ted Nelson

## #21 2013-06-19 19:45:49

Stangerzv
Full Member

Offline

### Re: My New Residue Prime Number (Unless someone else found it)

I have tested up to n=30,000 no prime so far. I would run up to n=200,000 and lets see whether there would be more prime or not.

• Index
•  » This is Cool
•  » My New Residue Prime Number (Unless someone else found it)