Пятница, 13-е: есть ли в ней что-нибудь особенное?
Исследование, проведенное вместе с Mathematica
Исследование, проведенное вместе с Mathematica
Общее количество использованных в посте встроенных функций или символов: 64
Список имен используемых встроенных функций и символов в порядке их появления в коде:
DateDifference | DateString | List ({...}) | Row | If | Equal (==) | CompoundExpression (;) | Set (=) | SetOptions | BarChart | Rule (->, ->) | ChartLabels | Map (/@) | Function (&) | Style | Slot (#) | Bold | ImageSize | ColorFunction | ColorData | TicksStyle | Directive | AxesStyle | Thick | GridLinesStyle | Dashed | Table | Tally | Labeled | Part ([[…]]) | Sort | ReplaceAll (/.) | Thread | Range | Less (<) | Span (;;) | All | Ticks | Automatic | Manipulate | Red | SetDelayed (:=) | Pattern (:) | Blank (_) | Flatten | Position | Total | Abs | Plus (+) | Times (*, ×) | PlotRange | GridLines | None | PlotRangePadding | Length | Grid | Join | Background | LightOrange | LightGreen | LightYellow | Frame | ItemStyle | Power (^)
Список имен используемых встроенных функций и символов в порядке их появления в коде:
DateDifference | DateString | List ({...}) | Row | If | Equal (==) | CompoundExpression (;) | Set (=) | SetOptions | BarChart | Rule (->, ->) | ChartLabels | Map (/@) | Function (&) | Style | Slot (#) | Bold | ImageSize | ColorFunction | ColorData | TicksStyle | Directive | AxesStyle | Thick | GridLinesStyle | Dashed | Table | Tally | Labeled | Part ([[…]]) | Sort | ReplaceAll (/.) | Thread | Range | Less (<) | Span (;;) | All | Ticks | Automatic | Manipulate | Red | SetDelayed (:=) | Pattern (:) | Blank (_) | Flatten | Position | Total | Abs | Plus (+) | Times (*, ×) | PlotRange | GridLines | None | PlotRangePadding | Length | Grid | Join | Background | LightOrange | LightGreen | LightYellow | Frame | ItemStyle | Power (^)
Недавно была пятница, 13-е Июля 2012 г. Этот пост готовился к ней, но так получилось, что опубликовать его именно в пятницу, 13-е не удалось.
Узнать сколько дней назад было 13.07.2012 г. в Mathematica можно с помощью функции DateDifference следующим образом:
In[1]:=
DateDifference["13.07.2012", DateString[{"Day", ".", "Month", ".", "Year"}], "Day"]
Out[1]=
Узнать, какое сегодня число, день недели, месяц и год, в Mathematica можно с помощью функции DateString:
In[2]:=
DateString[{"День недели: ", "DayName", "\nЧисло: ", "Day", "\nМесяц: ", "MonthName", "\nГод: ", "Year"}]
Out[2]=
