映射函数从列表到数据

Question

我正在考虑更改hnn包以支持网络中每个节点的不同激活功能。

特别是， 这一行和这一行使用特定的功能（激活），但我试图扩展它以支持以下内容：

evalNet n@(Network{..}) inputs activations = do
    s <- foldM (\x -> computeStepM n x (activations!!N)) state inputsV

其中N是节点id / index。

目前我处于一个阶段，我的激活功能列表与网络中的节点数量相同。

我需要帮助（因为我在包源代码中丢失）以找到从列表中应用Nth activations函数的方法。

编辑：我尝试使用tick （来自文档）和使用zip函数的StateT方法，每个步骤都给出多次执行，因此最终结果会出错

Answer 1

对于地图，您可能需要类似的东西

as = [(+1),(*2),(+(-3))]
xs = [4,5,6]
main = print $ zipWith ($) as xs

折叠更复杂，但可以使用相同的想法：使用相应的激活函数压缩输入并更改函数折叠以使用传入元组的值。

但是，我怀疑你真的需要/想要改变折叠。 如果我没有弄错，折叠应该只传递激活功能列表。 所以实际上没什么可做的。