Mathematica 9 is now available
Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
2001
*January
*February
*March
*April
*May
*June
*July
*August
*September
*October
*November
*December
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 2001

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

Search the Archive

Re: Date calculating software?

  • To: mathgroup at smc.vnet.net
  • Subject: [mg30428] Re: Date calculating software?
  • From: Tom Burton <tburton at cts.com>
  • Date: Fri, 17 Aug 2001 03:10:03 -0400 (EDT)
  • References: <9ld133$2f3$1@smc.vnet.net>
  • Sender: owner-wri-mathgroup at wolfram.com

On Wed, 15 Aug 2001 05:24:51 +0000 (UTC), in comp.soft-sys.math.mathematica Noz NOSPAM wrote:

>Is there a software program or calculator available that can eg. Add a
>period of time to a date?

Needs["Miscellaneous`Calendar`"]

Then define

DatePlus[{y_,m_,d_},{yy_,mm_,dd_}]:=DaysPlus[{y+yy+Quotient[m+mm,12,1],Mod[m+mm,12,1],d},dd]
>
>example, today is 14 August 2001.
>
>14082001 + 18 months
>
In[26]:= DatePlus[{2001,8,14},{0,18,0}]
Out[26]= {2003, 2, 14}

>or
>
>14082001 + 1yr, 3mths, 4 days, and produces the date 1yr, 3mths and 4 days
>hence?

In[24]:= DatePlus[{2001,8,14},{1,3,4}]
Out[24]= {2002, 11, 18}

and

In[25]:= DatePlus[{2001,8,14},{1,4,24}]
Out[25]= {2003, 1, 7}
Tom Burton


  • Prev by Date: byte[ ] of J/Link
  • Next by Date: Re: Date calculating software?
  • Previous by thread: Re: Date calculating software?
  • Next by thread: RE: Date calculating software?