3 変数の関数を使用して (合計するために) MapThread を 2 つのリストに折りたたみたいと思います。ここで、3 番目の変数は Mapthread で定数です。私はこのようなことを達成したいと思います:
nList = {}; For[i = 0, i <= Length[N0], i++, nSum = 0; Fold[Plus,0,MapThread[n,T,M,N0[i]]]];
ここで、n は n[t_,m_,n0_] のようなものです。Length[T] のリスト N0' を作成し、それを N0[i] で埋めることができますが、これはちょっとしたハックです。どんな助けでも大歓迎です!