a = 2;
n = 1;
j = 10;
tabj = Table[0, {i, j}];
Do[tabj[[i]] = n;
n1 = a n;
n = n1, {i, j}];
a2plot = ListPlot[tabj, Joined -> True][/i]
I was instructed to use this as a model to form my own program like this and just wanted to know what exactly is going where. This may sound like nonsense but this is what i got and don't quite know where I'm going wrong.
[i]f = 0.1;
g = 1.1;
m = 1100;
tabj = Table[10000, {i, g}];
Do[tabj[[i]] = n;
Subscript[r, n + 1] =
Subscript[r, n] - Subscript[fr, n] + Subscript[gfr, n];
Subscript[m, n + 1] = Subscript[gfr, n], {i, g}];
a2plot = ListPlot[tabj, Joined -> True][/i][/i]