situxuming
situxuming
生活,一场竞技,每时每刻我都不断地要求超越自己!这样我才能成为生活强者!
关注数: 15
粉丝数: 101
发帖数: 1,593
关注贴吧数: 27
Haskell语言吧吧规 在Haskell语言吧中,主要是提供一个Haskell学习的交流地方,拒绝一切广告和灌水贴,因为这个贴吧不需要流量。
#建议#安卓版选择完符号后自动换回 提一个小建议,安卓版选择完符号,例如选择星号“*”后,希望能够自动换回字母键盘,这样使用起来更方便,不用每次输入一个符号,还要按下返回键。毕竟很多时候并不会连续输入多个符号。 如果考虑到有些表情控,或者特定情况下需要连续输入符号,那么可以增加一个锁定按钮,例如目前的符号键盘中的返回键就可替换成锁定,锁定了,就可以连续输入符号而不自动返回字母键盘了。 小小建议,希望可以考虑。
Haskell学习资料分享 从Mathematica到Lisp再到Haskell,一直被函数式编程的魅力所吸引。下面分享从学Haskell以来所收集到的相关学习资料,当然基本上都是英文的。相信,学Haskell的,英文都不成问题。分享在百度网盘中,私密分享,希望大家根据自己需要下载就行,不要再分享扩散了,就当是咱Haskell小贴吧的福利吧!^_^ 毕竟分享的大多数书籍还是盗版的,扩散分享不知啥时就被和谐了。 ******************************************************************************************************* 链接:http://tieba.baidu.com/mo/q/checkurl?url=https%3A%2F%2Fpan.baidu.com%2Fs%2F1zPaxUHijqmDONpFAPku2_A&urlrefer=5f15c857d83d366b769923194a63cb6e 密码:7tbc ******************************************************************************************************* 下图是所有的书籍的截图:
Function by Others Except Itself游戏,活跃下贴吧气氛 工作了之后就好久没来MMA吧活跃了。最近在学Haskell,看到有篇文章提到说,熟悉一门语言的有效方法是尽可能使用该语言的所有特性来实现其某内置函数的功能,但是除了使用该函数本身。想到MMA,就觉得应该也可以采用该方法来熟悉MMA的特性以及相关函数的使用了。 基于此,我就想到到贴吧里来发起这个游戏,游戏规则很简单:每个人都可以指定一个内置函数,然后尽可能多的采用其他方法(但是除了使用该函数本身)来实现该内置函数的功能,要求实现的功能要完全一致,例如函数A针对所有数据类型进行操作,那么其他实现方式也是要针对所有数据类型都具有一样的功能,这一点非常重要。 当然,其他人也可以对其进行补充,这样于己于人都是一次不错的学习过程。 好了,介绍就到此为止,下面我抛出个引子,例如MMA中选取列表最后一个元素的函数Last,可以采用以下方式来实现: ******************************************************************************************************************************************* test = {1, "abc", s, "a", Sin[3], 1.34, 6/5}; Fold[#2 &, test] First[Reverse[test]] test[[-1]] test[[-1]] Nest[Rest, test, Length@test - 1] // First test //. {x_, y__} :> {y} // First Take[test, -1] // First Drop[test, Length@test - 1] // First TakeDrop[test, -1][[1, 1]] Pick[test, SparseArray[{Length@test -> 1}], 1] // First Extract[test, -1] ************************************************************************************************************************************ 欢迎大家继续补充,后面的朋友继续 ^_^
小鹤双拼便携免安装版会更新嘛 如题,由于办公室电脑权限的问题,无法安装小鹤飞扬版,因此只能用便携免安装版,请问这个免安装版本会定时更新嘛?
在兰卡斯特,一年2万英镑左右够两人花嘛 导师想推荐我到兰卡斯特大学做博后,其实是兰卡斯特大学与中国电子科技大学的一个合作项目,因为我的工资是有兰卡斯特大学共同出的。这样,我首先是被电子科技大学招为他们的博后,然后挂电子科技大学的名作为visiting researcher全年在兰卡斯特大学工作,2年时间,年薪最高20万人民币,估计有2万英镑左右吧。兰卡斯特大学的那个导师说这样的特殊性可能不会收英国那么高的税收,并且到时视成果可以展期。想问下,这样一种形式的博士后经历是否值的去?跟普通的做兰卡斯特大学的博后有什么区别? 另外想问下,要是和女朋友一起来,2万左右英镑在兰卡斯特够两个人生活嘛? 谢谢大家能够提供的任何信息和建议!
求助DNS检测结果的分析 如下图,我昨天在3号主机搭建的wordpress网站http://tieba.baidu.com/mo/q/checkurl?url=http%3A%2F%2Fwww.zy3xj.com&urlrefer=2c0e0b2b87451c756bad6b57f179d2d7,域名解析后wordpress也安装好了,之后还访问了一段时间,只不过不稳定,时不时就无法访问了,而且只能用IE才能访问,谷歌浏览器则无法访问。 刚刚用DNS检测了下,发现江苏电信无记录,是不是对于江苏电信来说,DNS还没生效所以访问不了?我现在用的就是江苏电信。但是为什么昨晚,包括今天上午都偶尔能够登录访问,只是现在完全不能访问了。 求高手帮忙看看是什么问题?或者看看你们能不能访问我建的网站.谢谢各位!
将ESC [[ ESC修改为快捷键Ctrl+[的简便方法 当具有很多嵌套表达式的时候,使用[[和]]来表示列表的指数不利于阅读,而Mathematica中默认的输入法ESC [[ ESC和ESC ]] ESC又不方便。但是我们可以通过下面的方法将其修改为快捷键Ctrl-[和Ctrl-]: 1. 找到文件Mathematica\(version)\SystemFiles\FrontEnd\TextResources\Windows\KeyEventTranslations.tr 修改之前先做好备份。 2. 打开并找到EventTranslations[{这一行,并在这一行之后添加下面两行内容: Item[KeyEvent["[", Modifiers -> {Control}], FrontEndExecute[{FrontEnd`NotebookWrite[FrontEnd`InputNotebook[], "\[LeftDoubleBracket]", After]}]], Item[KeyEvent["]", Modifiers -> {Control}], FrontEndExecute[{FrontEnd`NotebookWrite[FrontEnd`InputNotebook[], "\[RightDoubleBracket]", After]}]], 3. 重启Mathematica,在笔记本中就可以通过快捷键Ctrl+[和Ctrl+]来输入[[和]]了。 注意:两个Item最后不要漏掉逗号,
官网Mathematica Student Certification Program Wolfram官网有个Mathematica Student Certification Program,其实也就相当于是一个资格证书的考试,从官网下载一个资格考试的文件,然后在一周内答完提交。一开始还以为会有多难了,今晚下载下来做了一下,好吧~都是基本的画图啊、解方程啊和一些函数的使用,比较简单。大家有兴趣可以去看看http://tieba.baidu.com/mo/q/checkurl?url=http%3A%2F%2Fwww.wolfram.com%2Ftraining%2Fcertification%2Fstudents%2F&urlrefer=163ea9bb33ea654cf98bb3f9a310269e
Mathematica学生使用入门 目前贴吧里面好像多了一些Mathematica新学习者,但是很多连基本的操作都不会,就来提问怎么解题~我想,来提问的,至少得知道Mathematica的基本操作吧。鉴于此,去官方找了一个针对学生的基本入门教程视频:http://tieba.baidu.com/mo/q/checkurl?url=http%3A%2F%2Fwww.wolfram.com%2Fbroadcast%2Fsearch.php%3FSearch%3Dintroduction%26x%3D32%26y%3D13%26video%3D501&urlrefer=1c5b6c147765ec4bbbf0c4138a36f98b 所幸的是,在优酷上找到相应的中文翻译版 视频来自:http://tieba.baidu.com/mo/q/checkurl?url=http%3A%2F%2Fv.youku.com%2Fv_show%2Fid_XMzEwMzY5ODAw.html&urlrefer=99f12b426b76e989fea49e17a3560729 这个视频,对于Mathematica的基本操作,以及怎样利用帮助文档来解决问题都做了相应的介绍,视频非常好。 建议新学者,多看看帮助文档,然后找本基本的入门教程看看,实体书推荐《Mathematica基础与应用》和《Mathematica 7实用教程》,这两本书也就是虚拟全书的中文化附加一点个人的内容,但是因为一本是基于MMA8,另一本是基于MMA7,都比较新,当当上都有,不必像有些人拿着古董的Mathematica中文教程,然后说这个在新版本中不行,那个在新版本中不行。 至于电子版,实在没有比较好的中文版又比较新的教程,只能提供一本英文的
Mathematica小贴士-微博 打个广告,咳咳~开了个Mathematica小贴士的微博,欢迎关注~基本每天都会更新。分享的内容会有自己平时学Mathematica的过程中的一点小心得小技巧,另外也会将twitter上MathematicaTip【http://tieba.baidu.com/mo/q/checkurl?url=https%3A%2F%2Ftwitter.com%2FMathematicaTip&urlrefer=25fe59455e98c6d36953009d41178a28】上发的一些内容转发到此微博中。
狡诈的正鹏电子 我一朋友在正鹏电子,一签签三年零几天,超过三年了,妥妥的让你试用6个月,你还只能默默接受~零几天,就让你多试用三个月,员工的工资有三个月就可以少发点,公司的成本就可以降低了~ 台资企业果然不是好鸟,钻法律孔子,坑人~ 大伙儿怎么看?
分享一首古风味道的轻音乐 虽然这是日本一个作曲家做的,好像是某部动漫里面的音乐,但是喜欢这种调调,略带忧伤,尤其是开头的那个孤魂声音~ 视频来自:http://tieba.baidu.com/mo/q/checkurl?url=http%3A%2F%2Fwww.tudou.com%2Fprograms%2Fview%2FcPjZ93avtt0%2F&urlrefer=857de0d20903f05a20c1db22978fa3ec
在host1free后台改了分配给的域名,现在wordpress上不了 因为host1free给分配的域名不是我想要的,所以就在后台将域名改了,结果改了之后上不了了,上网查了下,可以到phpMyAdmin里面找到 wp_options 表,然后将表中的 siteurl 和 home 字段的值修改为当前的新域名,但是我这样改了之后还是上不了啊~有同样使用host1free免费主机的朋友知道怎么解决这个问题嘛?
【水贴】MMA CDF对wordpress的支持 研究了几天,终于在host1free上的免费服务器上搞定了wordpress,第一件事是装了MMA CDF plugin,然后试了下简单的例子,还不错的说http://tieba.baidu.com/mo/q/checkurl?url=http%3A%2F%2Fzylu.host898.net%2F&urlrefer=8cd6740b96d1abd57847759f00c63ce8, 好吧,水贴一个,
大家用的什么主机服务商? 弱弱的问个问题,大家都用的是什么主机服务商?收费的还是免费的?免费的有哪些?打算也弄个自己的wordpress,但是不知道服务器去哪搞。另外想问下,google搜出来的这个wordpress,http://tieba.baidu.com/mo/q/checkurl?url=http%3A%2F%2Fwordpress.com%2F&urlrefer=862f0fa99283f92a23a748a0894f0873跟现在说的这个wordpress有什么差别啊?
不同质数因子NestWhile的改善 Project Euler上第47道题目,链接如下: http://tieba.baidu.com/mo/q/checkurl?url=http%3A%2F%2Fprojecteuler.net%2Fproblem%3D47&urlrefer=af027d927538678af2d155380b4d9894 最小的两个具有两个不同质数因子的连续整数是: 14 = 2 7 15 = 3 5 最小的三个具有三个不同质数因子的连续整数是: 644 = 2^2 7 23 645 = 3 5 43 646 = 2 17 19. 找出最小的四个具有四个不同质数因子的整数。它们之中的第一个是多少? ****************************************************************************** 最容易想到的是用NestWhile,自己写的程序如下: NestWhile[{Length@FactorInteger[#[[2]] + 1], #[[2]] + 1} &, {2, 209}, (#1[[1]] != 4 || #2[[1]] != 4 || #3[[1]] != 4 || #4[[1]] != 4) &, 4] 运行时间:1.36 sec *********************************************************************** 然后看到直接有内部函数PrimeNu可以算不同质数因子的个数,就改了下: NestWhile[{PrimeNu[#[[2]] + 1], #[[2]] + 1} &, {2, 209}, (#1[[1]] != 4 || #2[[1]] != 4 || #3[[1]] != 4 || #4[[1]] != 4) &, 4] 结果运行时间变为: 3.9 sec, 慢了3倍。 Trace看了一下,慢的原因是 PrimeNu会有一系列的判断过程,不像Length@FactorInteger这般直接。 *************************************************************************** 然后在这道题的Forum上看到有人贴出下面NestWhile版本: NestWhile[# + 1 &, 209, ! (And @@ Thread[4 == Length /@ FactorInteger[# + {0, 1, 2, 3}]]) &] 运行时间是: 3.32 sec 推测这个慢的原因是,相比我自己写的Nest程序,每一次Nest运算, 后面的判断都要进行较多的计算 这原因是从下面的改写得到的: NestWhile[# + 1 &, 209, ! ({4, 4, 4, 4} === Length /@ FactorInteger[# + {0, 1, 2, 3}]) &] 后面的判断减少了计算,运行时间提高到2.85sec ******************************************************************************** 但 这里最快的 却是 While循环: (a = 210; While[Length@FactorInteger[a] != 4 || Length@FactorInteger[a + 1] != 4 || Length@FactorInteger[a + 2] != 4 || Length@FactorInteger[a + 3] != 4, a++]; a) 运行时间:0.81 sec ********************************************************************************* For循环最慢: (For[i = 1, Not[{4, 4, 4, 4} === Length /@ FactorInteger[i + {0, 1, 2, 3}]], i++]; i) 2.76 sec 如果Length/@FactorInteger替换成PrimeNu,时间突增到13s。足见,并不是任何内部函数都比自己编的函数要有效率的。。 。记得之前 @xzcyr 好像也发过一个帖子,是说怎么让NestWhile快过While,现在找不到了~ 对于这个具体问题,MMA函数式编程有什么改善的方法,使得其运行效率比单纯While循环快?
Reap-Sow从MMA画图中取出的数据非顺序排列 有的时候想从MMA画的图中取出数据到Origin里面话,最简单的办法就是 graph=Plot[Sin[x],{x,0,10}] 然后: pp=Cases[graph,Line[x_]:>x,Infinity] 今天晚上,心血来潮,看到EvaluationMonitor函数,就想了另外一种办法: p=Reap[Plot[Sin[x],{x,0,10}, EvaluationMonitor:>Sow[{x,Sin[x]}]];] 然后: ListLinePlot[p[[2,1]]] 得到如下图形:仔细看了一下,则是因为p[[2,1]]里面的数据不是有序排列,Sort一下就OK了而用第一种办法,取出的数据则正常从帮助文档来看,EvaluationMonitor is an option for various numerical computation and plotting functions that gives an expression to evaluate whenever functions derived from the input are evaluated numerically. 很明显,第一种方法得到的点都是Plot函数内部进行每一次计算所得到的。 现在问题是:Plot在画图时,内部算法在计算取点的时候,难道不是从左往右依次取点的? 有知道确定答案的不?
MMA内置函数重造 最近在看Power Programming with Mathematica: The kernel,因为这本书里面的MMA版本较老,所以现在版本里的很多函数,再那里都还没有,因为后面的练习题有一些是函数重造的练习题。编写了一点,感觉MMA内置函数重造也是一个不错的熟悉、练习MMA编程的过程,尽管有的时候自己编写的函数相比内置函数,运行效率差距不是一点点。函数重造的一个要求就是要能实现内置函数的全部功能,后面抛砖引玉编写了两个: 1. 首先是Extract,Extract有两个功能, 一个就是取出元素Extract[expr,{list1,list2,...}] 另一个是在取出元素之后,在其计算之前加上函数头h,即Extract[expr,list,h] 重造函数及其功能实现如下图:2,第二个是NumericQ的重造 最简单的办法就是NumberQ[N[expr]] 另外还有一个递归的算法,思想就是数字或者MMA常数比如Pi则是数字量,或者函数头具有NumericFunction属性且其所有参数都是数字或MMA常数,则是数字量。算法如下: myNumericQ1[x_, appendx___] := If[AtomQ[x], True, MemberQ[Attributes[Evaluate@Head[x]], NumericFunction]] && If[AtomQ[x], NumberQ[x] || MemberQ[Attributes[x], Constant], myNumericQ[Sequence @@ x]] && If[{appendx} === {}, True, myNumericQ[Sequence @@ appendx]] 递归算法就是有一个不足,有递归限制,然后运行效率 不是很高 另外一个改进算法,就是提取出表达式的所有函数头以及参数,Union去除重复的,然后分别检测函数头跟参数是否满足上述条件,对于Atom,则单独处理: myNumericQ[expr_?AtomQ] := NumberQ[expr] || MemberQ[Attributes[expr], Constant] myNumericQ[expr_] := With[{all = Union[Select[Level[expr, Infinity, Heads -> True], AtomQ]], leaf = Union[Select[Level[expr, Infinity], AtomQ]]}, And @@ Flatten@{(NumberQ[#] || MemberQ[Attributes[#], Constant]) & /@ leaf, MemberQ[Attributes[#], NumericFunction] & /@ Complement[all, leaf]}] 这些就随便玩玩,欢迎交流,有兴趣的朋友也可以贴上自己重构的函数,对于这两个函数,有改进的算法也欢迎交流运行情况来看,myNumericQ还可以,这么一个复杂的式子也可以检测出来,但是myNumericQ1递归的定义方式就有点问题了,t这么一个复杂的表达式就无法判断了,对于简单的式子还可以,问题出在哪里,有空了再检查检查,而至于NumberQ[N[expr]]的重造方式,只要计算不超过$MaxNumber,都是可行的,这也是NumberQ[N[expr]]的弱点,要判断,必须先计算
【Mathematica作图】碧叶橄榄翡翠杯 如下图, 不过代码不是自己写的,网上看到的,分享分享顺带分享其连接http://tieba.baidu.com/mo/q/checkurl?url=http%3A%2F%2Fwww.xiachufang.com%2Fcook%2F10009708%2F&urlrefer=8cc5947184a19896d26394f47a1cb188,大家可以学习学习
Origin与Mathematica共同处理数据 这里只是分享一点自己最近处理实验数据发现的Origin与Mathematica协同工作的一点小玩意儿,在Origin工具选项最后有个Mathematica links,如下图:点击会出现一下对话框:这里有四个Tag,Column是送列数据到Mathamatica内核(左边)及接收Mathematica内核处理后的数据(右边),Matrix是送与收矩阵数据,Function可以画函数图像,Evaluate主要是针对Column和Matrix送的数据进行计算处理,这里一Column为例子,设置好如下参数:这里,我送的Column A的数据,接收数据的是Column C,然后点击Send,就将数据送入Mathematica内核了,接着在Evaluate tag下输入Mathematica函数命令对数据进行计算处理,如下图:然后回到Column ta**击右边Receive,就把处理之后的数据放入Column C了。想这样一个除法然后外加倒排数据,单纯靠Origin,实现起来有点难,也许是我对Origin很多功能还不知道吧,但结合Mathematica links就可以很容易实现了。相信,使用这个功能,在Origin里面就能实现更复杂的数据处理了。 这里的介绍只是冰山一角,自己也只是初窥其道,以后有好的使用体验了再做分享。 顺带说一下,使用Mathematica links须知预先做些设置,如何设置以及详细操作,感兴趣的朋友查阅Origin帮助文档吧,分享完继续处理我的数据(撒花)
【转载】关于Mathematica提速的10点技巧 看到有吧友求MMA编程提速技巧,就想到这篇文章了。这篇是Wolfram Blog上的一篇文章http://tieba.baidu.com/mo/q/checkurl?url=http%3A%2F%2Fblog.wolfram.com%2F2011%2F12%2F07%2F10-tips-for-writing-fast-mathematica-code%2F&urlrefer=06da9ed0ad59cb222158d613aa73dad3,之后在网上看到有人将之翻译过来了,就转载过来给各位吧友看看吧~此翻译文章的原址是http://tieba.baidu.com/mo/q/checkurl?url=http%3A%2F%2Fwww.cnblogs.com%2Fmymma%2Farchive%2F2012%2F08%2F27%2F2659007.html&urlrefer=9db8e15011db0a250ddcb23753252902 当人们跟我抱怨说Mathematica不够快时,我一般会叫他们去仔细瞧瞧那些令人恼怒的代码.跑得慢的原因通常不是Mathematica的性能问题,而是使用方式不太合适.我想我应该分享一些我在优化Mathematica代码时使用的技巧. 1.如果可能话,使用机器精度数并尽量提早使用 如我所见,那些漫不经心的程序员所编写的缓慢的代码的一个共同特点是,一下子让Mathematica考虑到了太多的琐事而忽略自己的实际需求.不必要的附加计算是导致代码缓慢的最普遍原因. 大部分的数值计算软件中没有这些附加计算,1/3和0.33333333333333被认为是相等的.这些附加计算在你遇到一些复杂难缠的计算时是很有用的.但是在大部分的计算任务中,浮点运算的机器精度已经足够好,更重要的是,计算速度更快.任何小数位数小于16位的十进制输入都会自动被Mathematica按机器精度处理,所以,如何你的计算原则是速度优先,那么就尽可能使用机器精度的小数而不是精确形式(例如1/3).这里有一个简单的例子说明直接使用浮点数进行机器精度的运算会比先用绝对精确形式计算然后转换为小数的方法快50倍左右.当然,我们这个例子里得到的结果是相同的.
列表产生函数Range,Table和Array运算效率的比较 晚上看了一本讲解MMA编程的书,上面提到说Table产生的列表,用Range照样能产生,并且效率更高,因此在MMA函数编程中,其实Table都用得比较少的。然后自己就去验证了一下,想起来Array也是可以产生列表的,就把Array函数也加入对比,对比了两组结果,一组产生一维列表,另一组产生二维列表,并且保证Table,Range和Array产生的列表都完全相同。下面是对比的结果: 产生一维列表:产生二维列表:从上面的对比,可以很明显的看到,Range的效率确实是最高的,其次是Table,然后才是Array。 函数编程高效的一个原则就是将列表作为一个整体单一元素看待,即所有操作都作用于列表整体;避免拆分列表,比如对列表元素的索引取出部分元素。 由此可以知道,Range的操作是对于整个列表整体的,Array则是要拆分列表,这由Array的帮助文档就可以知道: Array[f,{n1,n2,...}] generates an n1*n2*... array of nested lists, with elements f[n1,n2,...]. 而Table,其实还是一个循环结构,只不过这个循环结构是经过MMA优化的。所以它的运算效率比Array要高一点,但比Range要低很多。 所以,觉得,如果要产生大量数据的列表时,还是优先选择Range吧
剧情的一个疑问 有一集是天明帮楚南公捡鞋,之后楚南公让天明3日后去见他,但到现在了,天明都没去见他,难道放了这么多集了,三天还没过去,卫庄都失踪这么多天了。。。
关于解方程的一个问题 对于这么一个方程 NSolve[(x - 3)^2 + (y - 0)^2 == 8^2 && (x - 0.44)^2 + (y - 0)^2 == 5^2, {x, y}] 可以求出解{{x -> -5.89719, y -> 0. + 3.89358 I}, {x -> -5.89719, y -> 0. - 3.89358 I}}没错, 但是加了一个限定,在实数域上求值,就出现错误信息,虽然返回的结果是空集。 NSolve[(x - 3)^2 + (y - 0)^2 == 8^2 && (x - 0.44)^2 + (y - 0)^2 == 5^2, {x, y}, Reals] 错误信息: NSolve::ratnz: NSolve was unable to solve the system with inexact coefficients. The answer was obtained by solving a corresponding exact system and numericizing the result. 把NSolve换成Solve是一样的错误信息,这个可以理解的,因为里面有0.44,Solve和NSolve其实都是同样的过程。但是换成 Solve[(x - 3)^2 + (y - 0)^2 == 8^2 && (x - 11/25)^2 + (y - 0)^2 == 5^2, {x, y}, Reals] 0.44用11/25来代替,就完美的返回一个空集,并且没有错误信息。 现在就想知道,怎样是得NSolve对于这个方程能够完美返回一个空集而不要出现一个错误信息。
【关于贴吧求助贴的一点建议,大家可以参考参考】 这吧有带头大哥在了,最近果然是越来越热闹了,也看到了很多以前没见过的朋友来这里求助问题。但是,很多朋友的求助帖,我看了,怎么说了,就一个感觉,是真的来求助吗? 求助帖,最忌讳的就是一上来就直接求某某大神帮忙做个题目或者编个代码什么的,自己啥都没做就上来,想不劳而获。这种帖子,一般都不会有人理。而特别是一些很简单的问题,明明查看帮助文档就能自己解决的,也来浪费时间求助。以前这个贴吧会有这种帖子,最近进入正轨了,好像都没怎么看到。风气越来越好了! 大多数朋友来求助,基本上都是自己做过一些工作,碰到问题了,然后来贴吧寻求帮助。大家也可以都多讨论讨论,集思广益,这对于交流学习是非常有帮助的。 但现在有个问题就是,鉴于贴吧功能的有限,尤其是排版功能的极度薄弱,很多人就直接将自己MMA里运行的代码以及结果截个图上传上来,然后来询问什么问题。当然如果代码短,那还好,我们自己敲敲键盘也就几十秒的时间,但是如果是一大段非常长的代码,还是有很多数学函数的,这个你让贴吧里的其他朋友再自己敲键盘,实在不现实,也没有人会这么做。毕竟,每个人都有自己的事情,能来解答你的问题已是很热心的人了。如果还要他自己敲代码,我觉得,这是不好的。 所以对于求助帖,我提下面几点建议,或者说一个格式,这样方便吧里朋友应助: 1. 首先,必须说明求助问题的背景。如果是有关Mathematica本身的,那不用介绍,没什么问题。但如果是涉及的专业的问题,那背景必须要介绍,不然别人都不知道怎么帮助你。你可以说说你的问题,以及想要达到的结果,或者一段代码是用来干嘛的,或者某个概念的解释。当然,最好的是,能够自己分析,将自己想要达到的结果转化为Mathematica问题。 举个例子,比如来求助怎样用Mathmatica画面心立方体晶体结构,然后罗列了自己的一些代码。但是不是每个人都知道什么是面心立方体晶体结构的。你可以将这个转化为:怎样根据一个空间点阵中点的坐标,在Mathematica中画出这些点。因为,空间点阵中点的坐标是你理解知道的,而在Mathematica中画出这些点是你所缺乏的,但却是这个贴吧里很多朋友所知道的。 这样的求助,才是有效率的!尽量少涉及专业的东西,一定的涉及,那也要介绍精彩背景。 2. 其次,必须是得自己尝试过。任何自己一点都没有尝试的求助是没有意义的,对于求助者自己,学不到什么东西,因为你没有尝试,就没有自己的想法;没有自己的想法,那么,别人的答案等于0,无论别人是对还是错,对没有想法的人来说,都是无意义的。 而这个尝试,不一定就是说,你得编出一段代码出来。任何小的尝试,你都可以写进自己求助贴中已做工作的部分。比如,你想要达到某个结果,自己查阅了某个函数,但是这个函数不能完全实现自己的结果。这个尝试之后,再来求助,才会有收获。 总之,不能是啥都没做,就来求助。 3. 如果是自己尝试过编写了代码,那么求助的时候,最好将代码运行时碰到的问题或者跟自己的预期的差别说清楚,这样别人才有的放矢。 这里的一个建议是,能找到自己预期的结果,最好也贴上来,文字或者图片格式都行。而对于代码运行过程中运行的问题【就是运行中出现的橙色字的警告信息或者错误信息】,可以直接就截图传上来,因为这些信息中有时会涉及到一些函数的表达,直接复制上来贴到贴吧里,就是Mathematica的输入形式,看起来比较困难,特别是一些特殊符号和特殊的函数形式。 4. 贴上自己编写的代码【如果有的话】。这里,你可以也截图传上来,其理由同上,毕竟Mathematica里的二维输入以及函数形式看起来舒服。但这不是必须的。必须的,就是: 【直接复制你的Mathematica代码到贴吧里。虽然复制过来是MMA的输入形式,但是应助者再拷贝到MMA中时,就又是MMA的标准形式了。而这样做的最主要的目的是给人方便。不要你自己编写的一段长长的代码,然后截个图上来,问吧里朋友这段代码有什么问题。要知道,很多时候,不实际运行一下,一时半会儿是看不出问题所在的。而这么长的代码,要让应助者自己敲键盘,我想,很多人都不乐意的】 所以为了自己的求助问题的效率,也为了给人方便,就贴上自己的代码吧。就一个Ctrl+C和Ctrl+V的时间,还不到5秒中的时间。。。 建议就这些吧,只是给大家来求助问题时参考参考,怎样提问求助才能高效快速的得到别人的帮助。^_^ 就说这么多了,码这些字还真不容易。。。。。
Matheamtica 9.0与8.0单位运算部分的新特性对比 晚上去官网看了下9.0版本的更新,因为9.0还没有下载下来,所以就通过官网的例子在8.0.4版本上运行下,然后跟官网对比。具体对比如下:另外还有带单位的积分,带单位画图等等,嗯,感觉,9.0版本单位运算是要强化了很多啊。8.0版本的单位运算,说实在的,没啥用。 感觉9.0的版本,值得体验。
关于MMA洛仑兹非线性拟合的问题 处理一些荧光光谱的数据,得到的光谱图如下:现在我需要对曲线图里两个峰值进行洛仑兹非线性拟合。因为数据较多,Origin里面貌似也没有批量进行多峰拟合的功能,就想到用Mathematica编程来实现。首先尝试了一个峰值的拟合的情况,下图是Origin里面的单峰洛仑兹非线性拟合的结果:下面我在MMA中对宽峰进行拟合, NonlinearModelFit[data8, y0 + 2 A/Pi w/(4 (x - xc)^2 + w^2), {{y0, 1154.}, {A, 1573.}, {w, .02}, {xc, 1.50}}, x]其中的拟合洛仑兹函数直接就是从Origin里面得到的,但是出现这么一个错误,说在给出的初始值处计算得到的函数值不是长度为1024的实数列表,但是从错误信息里给出的这个列表,点了下确实就是1024个数据。 对于NonlinearModelFit这个函数的具体运行过程也不是太明白。可有对MMA拟合比较在行的指点一二?还在对这个函数研究中。。。
来一个学术点讨论-关于Mathematica精度的问题 ArcTan[0,0]返回Indeterminate,这是合理的,毕竟0/0不确定值 而ArcTan[0.,0]返回0,类似的,ArcTan[0,0.]返回Pi/2,可以认为是0.是0的近似值,精度只有15.9546,而0具有无限精度,即无穷大,那么,对于0来说,0. 则不是一个0,自然,0/0.=0,0./0=Infinity,这也是很好理解的。因此,ArcTan[0.,N[0,16]]返回 0 和 ArcTan[N[0,16],0.]返回Pi/2就可以理解了。 那么ArcTan[0.,0.]返回Indeterminate,是因为两个数具有相同精度,彼此看对方都是0,所以就产生0/0的不确定数,这也可以理解。 下面考虑这么一个问题:Mathematica中$MachinePrecision==MachinePrecision 返回时True的,那么照理说ArcTan[N[0,$MachinePrecision],N[0,MachinePrecision]]和ArcTan[N[0,MachinePrecision],N[0,$MachinePrecision]]都应该是返回Indeterminate的,但事实是前一个返回Pi/2,后一个返回0 从结果来看,$MachinePrecision>MachinePrecision,可是,$MachinePrecision==MachinePrecision 又是True的,这个结果怎么解释呢? @cckinger @mm_酱 @妙谛莲花 @xzcyr 瞧瞧看看
吧里可有做理论物理研究的朋友,推荐两本书 Mathematica for Theoretical Physics Vol I & Vol II 爱问下载链接: http://tieba.baidu.com/mo/q/checkurl?url=http%3A%2F%2Fishare.iask.sina.com.cn%2Ff%2F11111050.html%3Ffrom%3Dlike&urlrefer=ac8cf965c7ad9cd3ae9003672c8677ce 学物理的看看这书不错,同时也是学Mathematica不错的书
感觉Mathematica吧里人越来越多,高手也多了 好久没有再来这里了,一直忙着写论**实验。今天偶尔来了一下,感觉这里隐藏这高手,人气好像也涨了~Mathematica荒废了好久了。。。唉
秦时明月更新太坑爹了 每周2集,比白发魔女更新还慢~纠结,还是找漫画看去
最近吧里貌似热闹了嘛 最近吧里的人貌似多了吗,好兆头~ 好久没有来吧里了,希望没有人把我忘了,哈哈~
Mathematica每日一学【持续更新】 1楼献给°娘,这是国际惯例~~
【音乐分享】两张轻音乐专辑【France Ellul的spirits系列】 关于France Ellul,不了解的人可以°娘之,这里简单说一下,FRANCE ELLUL是一位全才音乐家,是著名竖琴家。他创作了Spirits系列三部曲,Spirits of the Sea,Spirits of the Moon和Spirits of the Forest,这三张专辑都是非常空灵安静的,意境很悠远。欲详细了解这三张专辑,也请°娘之,建议谷哥之。好了,言归正传,上音乐。 下载地址: 115网盘 -Spirits of the Moon【APE无损】 http://tieba.baidu.com/mo/q/checkurl?url=http%3A%2F%2F115.com%2Ffile%2Fbecq27n3&urlrefer=5fd4e5f128d071c061bab0fb03f2c8b7 -Spirits of the Forest【320Kb MP3】http://tieba.baidu.com/mo/q/checkurl?url=http%3A%2F%2F115.com%2Ffile%2Fe78dqt5q&urlrefer=1b1515eb7c7f153e24dd171adaab53d4 QQ文件中转站 -Spirits of the Moon【APE无损】http://tieba.baidu.com/mo/q/checkurl?url=http%3A%2F%2Fmail.qq.com%2Fcgi-bin%2FftnExs_download%3Fk%3D5465306437bfd78a3e26b2444533544a0f5d0850555651561a510101071e520404511d0657555248535104050755535352010250631d662345045e07061d23095b105c4a4e1d3d36470c420d1740480a514b440c061d2b0a580b6d4ab49b484b194b420511335b%26code%3D7e0dc3fe%26t%3Dexs_ftn_download&urlrefer=016d911f435b24d84a02024b495e846a -Spirits of the Forest【320Kb MP3】http://tieba.baidu.com/mo/q/checkurl?url=http%3A%2F%2Fmail.qq.com%2Fcgi-bin%2FftnExs_download%3Fk%3D5438666577f68bca397be4451365021d56015750565756041d5b5f5305480400065c4b5c5606551f060b57545451020301010354354a307442590806504b755e5c4d0a4b134b775d4659080b500b1e1f1e6335155c175946431629031b31581c1e1648175417300f%26code%3D08fe5e02%26t%3Dexs_ftn_download&urlrefer=01a5a2c0a8b1edfd8c5d6e61fb562e5c 要是没有115网盘的朋友或者QQ中转站不能下载了,后面留邮箱,最好留QQ邮箱,这样我可以以QQ超大附件发给你们。QQ邮箱对QQ邮箱发送超大附件相对要好些,发到别的邮箱有可能被拒收或归入广告邮件。 不过很遗憾的是,Spirits of the Sea这张专辑在网上还没有找到下载的,大伙儿要有心,也找找看看,找到了不忘分享啊! 最后的最后,我再长传几首这两张专辑里的单曲,大家可以先听听,感觉符合自己的品味了再下载也不迟,不然总共300多M的音乐,网络不给力的话下载也是需要好长时间的。 Spirits of the forest 里的Elder And Elm Spirits of the forest 里的The Forest Awakes Spirits of the Moon 里的Moonchild
有没有人来秀一下赞一下鱼腩的,鱼腩负面的消息太多了 今天做实验无聊,逛这个吧,看到好多抱怨鱼腩的,有没有人来秀一下赞一下鱼腩的女同胞们啊?鱼腩其实还是很好的啊,我宿舍一室友,就是双鱼的,对他女朋友老好了,他们相恋差不多有六七年了。我自己也是一条鱼,自认为也是很好的,O(∩_∩)O哈哈~好吧,我水了!大家手下留情!
水瓶座女孩说“我们适合做普通朋友”,暗含什么意思呢? 朋友介绍了一个水瓶座的女孩给我认识,我们彼此聊了几天,今天短信聊的过程中,她突然就冒了句“我觉得我们适合做普通朋友”,后面我说,“当然是啊,当然是得从普通朋友做起。”后面过了一段时间,我又回了条短信,问她会不会觉得我以后能够成为她很好的朋友,然后有可能就成为男朋友?她过了一会儿,没直接回答,反问我觉得会不会。我回她时,说认识到她这个朋友是个意外之喜,我想,会有更大的喜的!然后她回了个笑一笑的表情,然后她说累了要睡觉了,就这般结束了~另外,有一点需要说明的是,目前我们还没有见过面。 所以就想请教各位,这后面有多少种可能的暗示呢?这次还真是想认真努力的追个女孩子了~多谢!
一段陈继儒的话,大伙儿给评析评析 小窗幽记里有一段话:清福上帝所吝,而习忙可以消福;清名上帝所忌,而得谤可以销名。 然后文末一段赏析看得我云里雾里,说道:人们往往把“享清福”当作人生追求的最终目标,为了他日能享上清福,终日奔忙,马不停蹄。其实清福不应是奔忙的终点站,而应是通向人生终点的一个又一个可望又可及的加油站,但如果我们一味地埋头开车,而不抬头望路,眼前的清福就会一晃而过。人人都追求美好的名声,但名声是不容易维持的,韩愈也说:“事修而谤兴,德高而毁来。”而这种毁谤的威力很大,能使多年积累的清名毁于一旦,真所谓“众口铄金,积毁销骨”。然而,疾风知劲草,日久见人心,只要具备身正不怕影子斜,真金不怕火炼的胸襟,日久天长,毁谤、流言当会不攻自破。 看了后面的评析,总感觉迷糊,尤其是对前半句:“清福上帝所吝,而习忙可以消福”,大伙给评析评析^_^
建议大家关闭灵格斯的划词翻译 最近发现,灵格斯的划词翻译跟很多软件会冲突,比如Adobe Acrobat、Paint.Net、Microsoft Outlook 2010等等,怎么冲突了?就是当你打开灵格斯划词翻译时,在上面这些软件里做选择操作时,就会弹出错误对话框,Adobe Acrobat中你用那个“快照”工具截取图片时就会出现复制到剪贴板错误的对话框,在Paint.Net和Outlook 2010中你利用选择工具选择的东西是不能被翻译的时候,这两个软件直接程度崩溃,弹出APPCRASH的错误对话框。 所以建议各位使用灵格斯的朋友,当不需要划词翻译的时候,一定要将划词翻译关闭,这样会省了你很多烦恼和困惑。
你觉得千年剑灵这个DLC值10块钱吗?
Mathematica吧好冷清 好冷清哦!是用Mathematica的人少吗?感觉比Maple吧冷清多了。。
埋怨几句古剑 不知道你们会不会出现这个问题,就是有的时候换地图读档或是对话时突然卡住,客户端出遇到问题终止程序。有的时候辛辛苦苦打完一个boss进入了剧情,可是对话或是换地图的时候出现问题,辛辛苦苦打过的boss又从打,又不知道要灭几次才能打过,比如打雷云之海的鲲鹏后换地图出问题,在紫藤林打天墉城的痞子师兄后情景对话时出问题,这两个boss都是灭了七、八次才过的。这么辛苦打完,却出问题造成白打。。这种愤怒的心情真是难以抑制。。那个时候真像砸了电脑。。就像小苏煞气外溢时那股想杀人的冲动。。。 真的希望烛龙能够改善这些不足。
大伙卸载GJ前有让你反激活吗? RT,我怎么没有啊?因为出了问题,只能卸载,可卸载时没弹出什么对话框要反激活啊,直接就卸载掉了,估计浪费了一次激活。
古剑这段情节,笑死我了 从打金蛟翦怪到夔牛跳呼呼啦啦舞,我就一直笑,跳舞的时候笑得我眼泪出、肚子疼。。。。第一次碰到这样的游戏。。。这游戏真值得。。。。 各位觉得了? 有什么好玩好笑的可以都分享在这里。本人算抛砖引玉吧。。。。。。
单机魔兽世界3.0.3.9版进不了团队副本 我买的是Playwow巫妖王单机版,上面说是3.0.3.9版,用户名和密码都是admin的安装完之后其他功能都好,但是进不了团队FB。 .gm on/off和副本难度都调过了没用还是进不去。人物等级也够70。 一进副本就提示你没有在一个团队中。 谁能帮帮忙解决一下啊。要是可以多添加帐号的功能也行我可以双开,但是就一个原来带的ADMIN帐号没办法啊,在这先谢谢各位了。
统计下,各位下数字版都用来多长时间 RT。。。。
想问下预售是什么意思? 今天在游民星空上看到古剑奇谭明天上午10点要预售,下午就跑到合肥一家实体店去询问情况,那老板说预售就是预定,要到7月10号正式上市才能拿到。本来我还期待明天能够拿到盘了。 想想,自己反正都是要买的,就在那预定了。拿了预售卡和发票,不过不像有的朋友说的有海报拿。 不知道各位朋友是什么情况?预售究竟什么意思呢?明天能不能拿到盘呢?要真还要等一个月,有点煎熬。
1
下一页