姜尧耕-渔樵耕牍的个人资料

我所认为的神笔有哪些。。由于我大部分笔都放学校了，加上这段时间丢了不少（同学们也挺识货的），所以如无例外，不放照片。旧笔的历史局限、新笔的专利限制与如今审美的激进，都指向了一个结果：没有一只改动前的笔壳是完美的。当然，由于结构限制以及材料特性，改过的笔也很难做到无可挑剔。下面从最接近于至笔的开始列举。 100元以上的部分涉猎较少，100元以下的部分基本没有我没用过一管往上的。

:为什么第一个可以顺利输出，第二个不行呢？Table不是有HoldAll Clear["`*"]; f := a; Table[f, {a, 1, 3}] Table[a &, {a, 1, 3}]

详评jj15 一楼说缺点

没见过比a2更好用的中油比，笔妃也不如a2 不觉得很怪么，还是a2是中国人根据本地书写习惯改良的

为什么Evaluate会给人这样的错觉？ Evaluate在我看来，只能把套在他外面的那个函数的Hold属性去掉 f[x_, y_] := x^2 + y^2 + Evaluate@a; f[x_, y_] := Evaluate[x^2 + y^2 + a]; 在左式中，套在Evaluate外面的函数是Plus而非SetDelayed，因而Evaluate就是废的——Plus没有HoldAttribute。右式中，Evaluate就使:=的HoldAllAttribute消失，使得:=变为了=，输出成功为8。

umn185是不是能保证是umn155的老版？

ReplaceAll有什么有别于F的属性吗？ x = 1; y = 1; F[x_, y_] := x + y F[3, 3] // Trace 他的输出是6。但是F没有HoldAll Attribute，为什么在F代入3,3之前x+y并未被计算为6呢？（SetDelayed有holdall我清楚，那F没有啊） ReplaceAll没有HoldAll属性，所以他在模式匹配之前计算了待匹配的式子。如果我们理解函数为一个模式匹配的话，那么应当是在代入之前函数自己偷偷算一遍才对，可为什么输出不是2而是6呢？

👀猜我都改了哪些地方

真tm无语了😓155哪能保证买到老版联新标题上写的155，居然偷偷把155n说成新老版混发。。。

中性笔结构命名指南看吧里面对笔各个部位的描述都很不清楚，希望此贴可以帮到大家。 http://tieba.baidu.com/mo/q/checkurl?url=https%3A%2F%2Fzhuanlan.zhihu.com%2Fp%2F670730182&urlrefer=21a6349d7786a7b197a3c209740aa793 最终版本会更新到上面链接当中

想玩玩油性芯，海豚三四十是不是有点太贵了？看着挺舒服的，求推荐壳子

档案墨水为什么不是油性的？档案墨水为什么不是油性的？碳素再放水也没油防啊

第一次拿起手机记录身边的景物，求大家给些改进建议！第一张图是第二张里面截取的，一是弥补焦段二是遮掩不咋好看的颜色（我不会调色

三菱想上天？

陪我了十三年的笔五岁那年开始用的，贴吧上有关他的最后一个帖子在13年。今日回购二支，测评到货后跟进。每个人人用得最顺手的笔，莫过于他用过的第一支。

一二三四级笔的一些简评先放一部分图

如何评价斑马笔尖灯笔我有一定天体观测的经历，结论是这玩意迪奥用没有适配性和blen一个德行

软胶一点都没觉得舒服，倒觉得难以控笔有什么粗硬之选么

斑马sarasa鸡尾臻顺滑s09 原芯太贵，故鸡之。一图流笔芯不够长，用附赠的那个笔帽反插进去正正好

20231111【水帖】唱个反调，末匠a1a2 显著缺点

thinkpad 2.5寸硬盘托架如何购买？如图所见，硬盘托丢失导致硬盘时而接触不良，想找一个一步到位的硬盘托用。进二手的时候没检查硬盘位，失策啊

关于x230的电池、显存、接口带宽的一些问题 lz最近为跑mma程序+偶尔玩玩网游入了一台x230。因为是学校出钱，另外入得比较匆忙，所以四百余大洋收下。从m4800上拆下来了一对标压的8gb的ddr3塞进去，成功识别。我对拖影要求比较高，平常也是只需要黑纸白字的显示（就算单色屏幕对我而言问题也不大），所以选的是tn屏版本。目前看上去并不能称上“瞎眼”，对视力影响估计和ips区别也不大，毕竟只是屏幕材质不同嘛。所以问题来了，我在复制大文件（比如从U盘里复制cad的安装包）时经常能跑到300mb/s往上，U盘是三星的barplus。但是小吧有写这句话，我实在没太懂什么意思，是他说我这本理论上3.0只能跑到80吗？那估计我上家没少改造咯。还有一问，为什么我的集显固定显存给到了32mb（是4000没错），但是几乎网上所有人都是64mb？我就见到过一个和我一样的。另外是不是电源按键得按一小段时间才有反应，还是我的太不灵敏了？电池的话，6芯80%健康度，60%电量，打开十个网页写这帖子显示剩余2小时50分钟，这续航已经持平我6代低压的latitudee7470了。最后，电池有自己独立的充电器卖吗？

为什么不可以这样表示占位符？ ReplaceList[{{a, b}, c, d, e, f}, {x_, y_} -> {{x}, {y}}] 期望输出： {{{a},{b}},c,d,e,f}

我怎么感觉for的第四参数很鸡肋？ x = 11; For[i = 1, i <= x, ++i; x -= 2] x x = 11; For[i = 1, i <= x, ++i, x -= 2] x 这俩一样

评价一下这块小表径格拉苏蒂潜水机芯和土豆5400和欧记8800比怎么样？

求助，如何更改至输出r的范围 Reduce[4 - 6 r + 3 r^2 < 0 && -1 + 6 r - 3 r^2 < 0 == False, r] 输出：False 希望：输出r，使得将r带入后4 - 6 r + 3 r^2 < 0 && -1 + 6 r - 3 r^2 < 0 的值为False

天堂鸡汤吧里发的帖总是漫画而地狱笑话吧里都是新闻

问题：想算一根杆子在有摩擦的水平面上下滑时质心的变化情况这上来有一个小坑（至少对我是这样的），是列完了方程之后要注意到有一段时间摩擦力是静摩擦，以此确定初始条件；因为掉在地上之后的结果我不感兴趣，用WhenEvent（guide/DifferentialEquationsWithEvents，感谢无影冬瓜的提醒）可以确定计算的终止范围，这一头一尾要确定。至于列出来后再DSolve，应当先把Solve所有能做的工作给他干了，用Eliminate，留下θ。这个所有人都有用到。最后就是确定不变的正方向，如果设全正是可以，不过脑子出错率就会高得多，我那帖里面或许就有这个问题。以前在难集和国培上分别做过μ=0的和μ->Infinity的，都是很基础的题目了；被同学提醒起来可以试试带μ的，故有以前那帖的提问。

为什么这样呢？不是listable属性问题呀 In[322]:= fanwei = {x, 0, 20, 0.1}; Table[x, fanwei] \:6B63\:5728\:8BA1\:7B97In[322]:= Table::nliter: Non-list iterator fanwei at position 2 does not evaluate to a real numeric value. Out[323]= Table[x, fanwei]

式子有点长，先谢过同志们了，我想算一个O——O在引力场下的运动 Clear["`*"]; G = 6.7; M = 1; Mr = 160; \[Theta] = Pi/4; r1 = {-x1[t], -y1[t]}; r2 = {-x2[t], -y2[t]}; v0 = 1; days = 100; s = NDSolve[{{x1''[t], y1''[t]} == +((G Mr M r1)/Norm[r1]^3) + {F1x[t], F1y[t]}/M, {x2''[t], y2''[t]} == +((G Mr M r2)/Norm[r2]^3) - {F1x[t], F1y[t]}/M, F1x[t]/F1y[t] == (x1[t] - x2[t])/(y1[t] - y2[t]), Sqrt[(x1[t] - x2[t])^2 + (y1[t] - y2[t])^2] == 2 Sqrt[2], {x1'[0], y1'[0]} == {Cos[\[Theta]], Sin[\[Theta]]} v0, {x2'[0], y2'[0]} == {Cos[\[Theta]], Sin[\[Theta]]} v0, {x1[0], y1[0]} == {0, -100}, {x2[0], y2[0]} == {2, -98} }, {x1[t], y1[t], x2[t], y2[t], F1x[t], F1y[t]}, {t, 0, 80}]; x1[t] /. s s a = ParametricPlot[Evaluate[{x1[t], y1[t]} /. %], {t, 1, 80}, AspectRatio -> 1, AxesOrigin -> {0, 0}]; b = ParametricPlot[Evaluate[{x2[t], y2[t]} /. %%], {t, 1, 80}, AspectRatio -> 1, AxesOrigin -> {0, 0}]; Show[a, b] img[t0_] := ParametricPlot[{{x1[t], y1[t]} /. s, {x2[t], y2[t]} /. s}, {t, 0, t0}, Epilog -> {Line[{Evaluate[{x1[t], y1[t]} /. s /. t -> t0], Evaluate[{x2[t], y2[t]} /. s /. t -> t0]}], Point[Evaluate[{x1[t], y1[t]} /. s /. t -> t0]], Point[Evaluate[{x2[t], y2[t]} /. s /. t -> t0]]}, PlotRange -> {{100, 300}}, Axes -> False, ImageSize -> Large, PlotStyle -> LightGray ] Manipulate[img[t], {t, 0.1, 80, 0.1}] 最后报错有点长，我能大概明白意思——中间的报错是

记录一下wl转latex的小心得首先就是方法——刷蓝+右键+Y+L。有的公式粘贴到我的typora上就识别得出来，但是在一些平台上就识别不出来，这是为什么呢？我略作思考，过程省略。上面是csdn，还好，告诉你有错；更有甚者——知乎，连错都不标出来，就直接公式落那儿。一看标识我就意识到了——$<->$是句间公式的符号，但是这里面mma采用了text来表征一些表达式，但是text的语法中就有$，有一些笨蛋编辑器并不认识，就把他和前、后两个$匹配起来了。这样一来，一个表达式被拆成了两半，中间还加了一块，自然就报错了。我最后聚焦到了一组公式上：注意到，单个字母和类似cos的国际化标识不会有text输出，字母组合会有，拉丁字母组合不会有。所以以后就要注意，即使在mma中打出来公式转latex，也要好好打，要不然容易被识别成一串字符加上text就甭想转载到别的平台上了。

请教一个解微分方程带入画图的问题 DSolve[1 - \[Rho]*g/(2 \[Sigma])*h[r]^2 == 1/Sqrt[1 + h'[r]^2], h[r],r] &应该是在声明纯函数，但是F1过了发现还是不太明白为什么有“[……&][……]”的形式，真的没太懂一般我就把&前的Slot1~n当作x1~n来理解了，问题不大

兄弟们，是不是maya一个bug，急麻了，能否救救孩子。。。？是这样，昨天随便做了一个行星轨道模型，行星是各个圆形曲线轨道的子对象；昨天导入完后编辑得好好的，今天早上一打开发现行星（球）全没了，有亿丢丢捉急行星、球模型是后来导入的，不过我想和是否是导入的关系不大吧？原来是这样的：

打算Maya转C4D，想问问各位老师好改吗？快捷键差别大吗？如题。感谢。

Maya的一个导入svg的问题，求教如图，无法导入，不显示

这个用手都能解的方程解不出来，帮看谢谢 In[28]:= ClearAll[m2, G, t, k]; DSolve[(m2*G)/((r[t])^2 k) == r''[t], {r[t]}, t] Out[29]= Solve[((2 G m2 ArcTanh[Sqrt[C[1] - (2 G m2)/(k r[t])]/Sqrt[C[ 1]]])/(k C[1]^(3/2)) + (Sqrt[C[1] - (2 G m2)/(k r[t])] r[t])/ C[1])^2 == (t + C[2])^2, r[t]]

新手，问一下这个微分方程怎么解。 Clear[x, y] DSolve[{y''[x] == k/(y[x])^2}, y[x], x] 回复： Solve[((2 k ArcTanh[Sqrt[C[1] - (2 k)/y[x]]/Sqrt[C[1]]])/C[1]^( 3/2) + (Sqrt[C[1] - (2 k)/y[x]] y[x])/C[1])^2 == (x + C[2])^2, y[x]]

不知道为什么好些函数图像老是画不出来比如这个：f[x_] = (9 - x)/(x^2 - 3*x + 6); Plot[(9 - x)/(x^2 - 3*x + 6), {x, -1, 4}] 新手，见谅

各位大佬，想问一下下面这个微分方程为什么报错各位大佬，想问一下下面这个微分方程为什么报错 Clear[k] Clear[f] Clear[m] DSolve[(-k x - f) D[t]^2 == m*(D^2)[x], x[t], t]