MathGroup Archive 2001

[Date Index] [Thread Index] [Author Index]

Search the Archive

Re: Limit[(p*(-1 + p^n))/(-1 + p), n->Infinity]

There is one trick, which often works in such cases and which I have 
described several times in this group in the past. The idea is to 
replace the limit of a sequence a[n] by the infinite sum 
Sum[a[n+1]-a[n],{n,1,Infinity}]+a[1]. Mathematica can quite frequently 
cope with such expressions symbolically. This is one of these cases:

Simplify[Sum[(p*(p^(n + 1) - 1))/(p - 1) -
      (p*(p^n - 1))/(p - 1), {n, 1, Infinity}] + p]

1 - p

Note that Mathematica here makes a silent assumption that -1<p<1. It 
sees to me somewhat questionable if such silent assumptions are a good 
thing (I would prefer answers in the form If[....]) but this happens 
quite often in Mathematica and seems to me to be a legacy from early 
versions (before Assumptions and Domains).

Andrzej Kozlowski
Toyama International University

On Friday, May 18, 2001, at 02:13  PM, Adalbert Hanssen wrote:

> Hi, MathGroup,
> of course, this one is easily done by hand:
> Limit[(p*(-1 + p^n))/(-1 + p), n->Infinity]
> but how does one do it with Mathematica?
> Of course, 0<=p<=1 (real) and n runs through integers.
> kind regards
> Dipl.-Math. Adalbert Hanszen

  • Prev by Date: Re: TableForm Question
  • Next by Date: Help tips.
  • Previous by thread: Limit[(p*(-1 + p^n))/(-1 + p), n->Infinity]
  • Next by thread: Mathematica graphics/fonts and Tex