小编Gre*_*per的帖子

评估[]似乎无法在Button []内部工作

知道如何让这个工作吗?

y = {}; Table[Button[x, AppendTo[y, Evaluate[x]]], {x, 5}]
Run Code Online (Sandbox Code Playgroud)

结果:单击[ 1],单击[ 2],获取{6,6}

我轻视实际的任务,但我们的目标是建立一个内部的按钮做什么MapTableParallelTable.

请帮忙!


编辑想
出来...... Evaluate只在第一级工作.在这里,它太深了.所以我用过ReplaceRule:

Remove[sub]; y = {}; Table[Button[x, AppendTo[y, sub]] /. sub -> x, {x, 5}]
Run Code Online (Sandbox Code Playgroud)

wolfram-mathematica mathematica-8

7
推荐指数
2
解决办法
495
查看次数

如何在 Mathematica 中将 Row[] 的元素对齐到底部或顶部?

当我写作时

Row[ {Framed@Column[{1,2}], Framed@"123"},  Alignment->Top]
Run Code Online (Sandbox Code Playgroud)

数学图形

或者

Row[ {Framed@Column[{1,2}], Framed@"123"},  Alignment->{Left,Top}]
Run Code Online (Sandbox Code Playgroud)

数学图形

无论哪种情况,都不会发生任何事情。默认对齐方式为居中,并且列出的元素与彼此的中线对齐。

Grid[ {{Framed@Column[{1,2}], Framed@"123"}}, Alignment->Top]
Run Code Online (Sandbox Code Playgroud)

数学图形

工作得很好,但是Grid[]当 a 就足够了时就有点过分了Row[]

帮助系统说对齐应该可以工作({Left,Baseline}作为示例列出),但它似乎无法更改。我正在使用 v8.0.4。

formatting wolfram-mathematica row alignment

6
推荐指数
1
解决办法
985
查看次数

Wolfram Mathematica中的神经网络包不是并行的吗?

我刚刚创建了一个非常大的神经网络,虽然是非常强大的硬件,想象我的震惊和失望,当我意识到来自NeuralNetworks`包的NeuralFit []似乎只使用一个核心,甚至没有达到最大容量.我伤心欲绝.我是否真的必须从头开始编写完整的NN实现?还是我想念一些简单的东西?

我的网络对200个神经元的2个隐藏层进行了200次输入以产生100个输出.我知道我们正在谈论数万亿计算,但只要我知道我的硬件是弱点 - 可以升级.如果单独放置一段时间,它应该能够很好地处理这种网络的训练(4Ghz 8线程机器具有24Gb的2000Mhz CL7内存,在SATA-III上运行RAID-0 SSD驱动器 - 我很确定).

想法?建议?提前感谢您的意见.

wolfram-mathematica mathematical-optimization neural-network mathematica-8

5
推荐指数
1
解决办法
2823
查看次数