QQ登录

只需要一步,快速开始

 注册地址  找回密码
查看: 2271|回复: 4
打印 上一主题 下一主题

关于mathematias

[复制链接]
字体大小: 正常 放大
hyy012345        

15

主题

12

听众

39

积分

升级  35.79%

  • TA的每日心情
    郁闷
    2015-9-12 09:18
  • 签到天数: 7 天

    [LV.3]偶尔看看II

    社区QQ达人

    跳转到指定楼层
    1#
    发表于 2015-4-16 19:35 |只看该作者 |倒序浏览
    |招呼Ta 关注Ta
    如何用mathematias计算欧拉常数?它的一些语言规则是什么?求解。。。。。。
    + T- K0 V/ J2 F9 |; j
    zan
    转播转播0 分享淘帖0 分享分享0 收藏收藏0 支持支持0 反对反对0 微信微信
    zhuxinran 实名认证       

    0

    主题

    10

    听众

    60

    积分

    升级  57.89%

  • TA的每日心情
    难过
    2016-2-20 19:29
  • 签到天数: 16 天

    [LV.4]偶尔看看III

    邮箱绑定达人 社区QQ达人

    回复

    使用道具 举报

    宏心        

    51

    主题

    19

    听众

    8038

    积分

    升级  60.76%

  • TA的每日心情
    开心
    2026-6-14 07:06
  • 签到天数: 3638 天

    [LV.Master]伴坛终老

    超级版主

    自我介绍
    数据分析,统计学的教学,数学建模的辅导
    回复

    使用道具 举报

    宏心        

    51

    主题

    19

    听众

    8038

    积分

    升级  60.76%

  • TA的每日心情
    开心
    2026-6-14 07:06
  • 签到天数: 3638 天

    [LV.Master]伴坛终老

    超级版主

    自我介绍
    数据分析,统计学的教学,数学建模的辅导
    回复

    使用道具 举报

    宏心        

    51

    主题

    19

    听众

    8038

    积分

    升级  60.76%

  • TA的每日心情
    开心
    2026-6-14 07:06
  • 签到天数: 3638 天

    [LV.Master]伴坛终老

    超级版主

    自我介绍
    数据分析,统计学的教学,数学建模的辅导
    s[n_] := NSum[1/k, {k, 1, n}];
    1 q1 d( s4 l) t; N8 Ut1 = Table[{k, s[k]}, {k, 1, 200}];/ @3 U- E" `+ c
    p1 = ListPlot[t1, PlotStyle -> PointSize[0.001]]* Q* d4 B  n8 J9 L/ c
    p2 = ListPlot[t1, PlotStyle -> {RGBColor[0, 0, 1]},
    7 U# g  ^' N0 Q" m, r   DisplayFunction -> Identity];; y. y8 R) u5 e  X/ m
    p21 = Plot[Log[x], {x, 1, 200}, PlotStyle -> {RGBColor[1, 0, 0]}, ' u4 y4 M  r- Q! X) k$ C
       DisplayFunction -> Identity];
    % X) m5 z5 q/ a6 y/ NShow[p2, p21, DisplayFunction -> $DisplayFunction]6 R! n# L) q! [9 g' V7 e
    c[n_] := s[n] - Log[n]; t = Table[{n, c[n]}, {n, 1, 200}];: X( M  [, p1 o! g
    p211 = ListPlot[t, PlotStyle -> {RGBColor[0, 0, 1]},
    . h7 Q/ D1 {* ?: n, o$ v   DisplayFunction -> Identity];: e7 }5 d1 z% A- _& v8 c6 P
    c1[n_] := s[n] - Log[200] + s[200]; t11 =
    . H! S$ H5 j' K  h6 u Table[{n, c1[n]}, {n, 1, 200}];
    " [* u$ k. v) A+ v, bp212 = ListPlot[t11, PlotStyle -> {RGBColor[1, 0, 0]},
    * K- ~/ z2 [- _4 d   DisplayFunction -> Identity];
    6 o7 J% \: D  X: y$ I" T; D+ NShow[p211, p212, DisplayFunction -> Identity]
    ' Q3 p% K9 j( ~' ^9 V% O9 x- f
    回复

    使用道具 举报

    您需要登录后才可以回帖 登录 | 注册地址

    qq
    收缩
    • 电话咨询

    • 04714969085
    fastpost

    关于我们| 联系我们| 诚征英才| 对外合作| 产品服务| QQ

    手机版|Archiver| |繁體中文 手机客户端  

    蒙公网安备 15010502000194号

    Powered by Discuz! X2.5   © 2001-2013 数学建模网-数学中国 ( 蒙ICP备14002410号-3 蒙BBS备-0002号 )     论坛法律顾问:王兆丰

    GMT+8, 2026-6-15 07:41 , Processed in 0.782723 second(s), 73 queries .

    回顶部