I am trying to post this question on Mathematica StackExchange but I am getting an error that my code is not properly formatted. I double-checked every line for some time now, but I cannot find an error.
Can someone help me to see what is wrong with my post? This is not the first time that this has happened to me. In the past, it was something as simple as an extra space at the end of a line that I had to delete but I would like an expert's help in identifying what I am doing wrong.
Considering the function
$$
f(x_1,x_2,x_3;y_1,y_2,y_3)=\frac{\left(1-\frac{y_1}{x_1}\right) \left(1-\frac{y_2}{x_1}\right) \left(1-\frac{y_3}{x_1}\right)\left(1-\frac{y_1}{x_2}\right) \left(1-\frac{y_2}{x_2}\right) \left(1-\frac{y_3}{x_2}\right)\left(1-\frac{y_1}{x_3}\right) \left(1-\frac{y_2}{x_3}\right)\left(1-\frac{y_3}{x_3}\right)}{\left(1-\frac{x_2}{x_1}\right) \left(1-\frac{x_3}{x_1}\right)\left(1-\frac{x_3}{x_2}\right) \left(1-\frac{y_2}{y_1}\right) \left(1-\frac{y_3}{y_1}\right)\left(1-\frac{y_3}{y_2}\right)}
$$
I am trying to compute the sum
$$
\sum_{w\in S_3\times S_3} w(f),
$$
where the first copy of $S_3$ in $w$ is permuting the indices of the variables $x_1, x_2, x_3$ while the second copy of $S_3$ is permuting the indices of the variables $y_1,y_2,y_3$.
I have a quasi-code
ClearAll[f]
f[x1_, x2_, x3_, y1_, y2_, y3_] = ((1 - x1^-1 y1)(1 - x1^-1 y2)(1 - x1^-1 y3)(1 - x2^-1 y1)(1 - x2^-1 y2)(1 - x2^-1 y3)(1 - x3^-1 y1)(1 - x3^-1 y2)(1 - x3^-1 y3))/((1 - x1^-1 x2)(1 - x1^-1 x3)(1 - x2^-1 x3)(1 - y1^-1 y2)(1 - y1^-1 y3)(1 - y2^-1 y3));
With[{xx = Array[Subscript[x, #] &, 3]},Sum[f@@ xx[[p]],{p,Permutations[Range[3]]}]]
With[{yy = Array[Subscript[y, #] &, 3]},Sum[f@@ yy[[p]],{p,Permutations[Range[3]]}]]
but I am not sure how to put the last two lines together.
Edit: Upon deleting all extraneous spaces, the following is how my post looks like but I am still getting an error that my code is not properly formatted.
Considering the function $$f(x_1,x_2,x_3;y_1,y_2,y_3)=\frac{\left(1-\frac{y_1}{x_1}\right)\left(1-\frac{y_2}{x_1}\right)\left(1-\frac{y_3}{x_1}\right)\left(1-\frac{y_1}{x_2}\right)\left(1-\frac{y_2}{x_2}\right)\left(1-\frac{y_3}{x_2}\right)\left(1-\frac{y_1}{x_3}\right)\left(1-\frac{y_2}{x_3}\right)\left(1-\frac{y_3}{x_3}\right)}{\left(1-\frac{x_2}{x_1}\right)\left(1-\frac{x_3}{x_1}\right)\left(1-\frac{x_3}{x_2}\right)\left(1-\frac{y_2}{y_1}\right)\left(1-\frac{y_3}{y_1}\right)\left(1-\frac{y_3}{y_2}\right)}$$
in $6$ variables, I would like to compute the sum
$$
\sum_{w\in S_3\times S_3}w(f),
$$
where the first copy of $S_3$ in $w$ is permuting the indices of the variables $x_1, x_2, x_3$ while the second copy of $S_3$ is permuting the indices of the variables $y_1,y_2,y_3$.
I have a quasi-code
ClearAll[f]
f[x1_,x2_,x3_,y1_,y2_,y3_]=((1-x1^-1y1)(1-x1^-1y2)(1-x1^-1y3)(1-x2^-1y1)(1-x2^-1y2)(1-x2^-1y3)(1-x3^-1y1)(1-x3^-1y2)(1-x3^-1y3))/((1-x1^-1x2)(1-x1^-1x3)(1-x2^-1x3)(1-y1^-1y2)(1-y1^-1y3)(1-y2^-1y3));
With[{xx=Array[Subscript[x,#]&,3]},Sum[f@@xx[[p]],{p,Permutations[Range[3]]}]]
With[{yy=Array[Subscript[y,#]&,3]},Sum[f@@yy[[p]],{p,Permutations[Range[3]]}]]
but I am not sure how to put the last two lines together.
Also, in case the following information is helpful, I am using Firefox.
Edit: I've copied and pasted the second set of lines verbatim as a post, and here is the snapshot of the error (I'm guessing that my posts will automatically be flagged until I've earned enough reputation points).