# Create list of {x,f(x)} pairs

How can I do this in Mathematica:

r=Range[0,20,0.13];
fr = HeavisideTheta[r];
data = somecoolfunctionsinmathematica[r,fr]


So that data now is in the form useful to Fit: {{r_1,fr_1},{r_2,fr_2},...}

Thanks!

-

This is the correct way to use Table if you prefer it to Map:
Table[{i, HeavisideTheta[10 - i]}, {i, 0, 20, 0.013}]

data = Table[{r[i], HeavisideTheta[10-r[i]]}, {r[i], Range[0, 20, 0.013]}]

 Map will do it: {#,HeavisideTheta[10-#]}&/@Range[0,20,0.013] – Sasha Nov 9 '11 at 13:16 Also Transpose[{#, HeavisideTheta[10 - #]}]&[Range[0, 20, 0.013]]... – J. M. Nov 9 '11 at 13:44 Funny how the (IMHO) much worse pops up in comments under my answer :) – rubenvb Nov 9 '11 at 13:47 That's alright. IMHO taking a procedural approach when functional methods are available is a bit of a step backwards, but whatever, right? – J. M. Nov 11 '11 at 2:04