Group Abstract

Message Boards

WOLFRAM COMMUNITY

4.8K Views

2 Replies

0 Total Likes

View groups...

Follow this post

Share this post:

GROUPS:

Mathematics Mathematica

How to create an expression of a N-fold integration?

C Z

Posted 11 years ago

POSTED BY: C Z

Reply
|
Flag

2 Replies

Sort By:

Replies
Likes
Recent

Nasser M. Abbasi

Nasser M. Abbasi, student

Posted 11 years ago

you could try foo[t_, n_] := Module[{s, z}, z = Array[t, n]; s = (Plus @@ (z[[2 ;; n - 1]])) (g[Sequence @@ z]/(z[[n]] + z[[1]])); Integrate[s, Sequence @@ ({#, 0, Infinity} & /@ z)] ] For example Grid[Table[{k, foo[t, k]}, {k, 3, 6}], Alignment -> Left] You can change the indexing as needed.

you could try

  foo[t_, n_] := Module[{s, z},
    z = Array[t, n];
    s = (Plus @@ (z[[2 ;; n - 1]])) (g[Sequence @@ z]/(z[[n]] + z[[1]]));
    Integrate[s, Sequence @@ ({#, 0, Infinity} & /@ z)]
    ]

For example

  Grid[Table[{k, foo[t, k]}, {k, 3, 6}], Alignment -> Left]

enter image description here

You can change the indexing as needed.

POSTED BY: Nasser M. Abbasi

Reply
|
Flag

C Z

Posted 11 years ago

Thanks, Nasser. Could you explain a little bit of the Plus @@ and Sequance @@? I searched but didn't find any clue about them.