Services & ResourcesWolfram ForumsMathGroup Archive

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

RE: A curious result?

• To: mathgroup at smc.vnet.net
• Subject: [mg91495] RE: [mg91488] A curious result?
• From: "Tony Harker" <a.harker at ucl.ac.uk>
• Date: Sun, 24 Aug 2008 07:04:57 -0400 (EDT)
• References: <200808230543.BAA21636@smc.vnet.net>

Is it surprising?

Show[Plot[1/n^1.001, {n, .3, 10}, AxesOrigin -> {1, 0}],
 Graphics[{Line[{{1, 0}, {1, 1}}], 
   Table[Line[{{n, 1/n^1.001}, {n + 1, 1/n^1.001}, {n + 1, 0}}], {n, 
     1, 10}]}], PlotRange -> {{1, 10}, {0, 1}}]

   Tony Harker 

]-> -----Original Message-----
]-> From: amzoti [mailto:amzoti at gmail.com] 
]-> Sent: 23 August 2008 06:44
]-> To: mathgroup at smc.vnet.net
]-> Subject: [mg91488] A curious result?
]-> 
]-> a. Sum[1/n^1.001, {n, 1 , Infinity}] = 1000.58
]-> 
]-> b. Integrate[1/n^(1.001), {n, 1, Infinity}] = 1000
]-> 
]-> 

• References:
  • A curious result?
    • From: amzoti <amzoti@gmail.com>