Re: How to force integers

• To: mathgroup at smc.vnet.net
• Subject: [mg122982] Re: How to force integers
• From: Costa Bravo <q13a27tt at aol.com>
• Date: Sat, 19 Nov 2011 06:46:42 -0500 (EST)
• Delivered-to: l-mathgroup@mail-archive0.wolfram.com
• References: <ja5kgb\$7qa\$1@smc.vnet.net>

Artur wrote:
> Table[(7/10 - (6/5)*(-1)^
>         n*(1/2)*(f^(15*(2 n - 1)) - (1/f)^(15 (2 n - 1))) + (1/
>          20)*(f^(30 (2 n - 1)) + (1/f)^(30 (2 n - 1)))) /.
>     f ->  GoldenRatio, {n, 1, 10}]
>
> Is possible to force integers without use Round or Floor of numeric values?

f1 = 1/(1/2 (Sqrt[5] + 1)) // FullSimplify
Table[(7/10 - (6/5)*(-1)^
n*(1/2)*(f^(15*(2 n - 1)) - (1/f)^(15 (2 n - 1))) + (1/
20)*(f^(30 (2 n - 1)) + (1/f)^(30 (2 n - 1)))) /. {1/f -> f1,
f -> 1/2 (Sqrt[5] + 1), n -> i} // Expand, {i, 1, 100}]

Out = {93844, 322001299796379844, .......      , 22655....793844}

--
Costa

• Prev by Date: Numerical Integration of Improper Integral
• Next by Date: Re: x and y plot finding maximum
• Previous by thread: Re: How to force integers
• Next by thread: Re: How to force integers