Message Boards Message Boards

GAMMA DISTRIBUTION VALUES

p = Plot[Evaluate@ Table[PDF[GammaDistribution[alpha, beta], x], {alpha, {0.001}}, {beta, {14660}}], {x, 0, 100000}, Filling -> Axis]. After this command, when i want to export the data points to excel in the form compatible with the word, i am not getting. I mean when i use the command, data = Cases[Normal[p], x_Line :> First[x], Infinity]; data = Flatten[data, 1]; TableForm[data[[1 ;; 100]]], i get the data points but i when i copy paste the values, all the values come as 10^(-6) which is not getting plotted in excel or origin. How do i achieve ths?
POSTED BY: nirupama radhakrishnan
2 Replies
Sort By:

You should not really by copying and pasting. Use export as in

data = Cases[Normal[p], x_Line :> First[x], Infinity]; data = Flatten[data, 1];
SetDirectory[NotebookDirectory[]];
Export["test.xls", data]

Now open the file "test.xls" in the same folder as the notebook using excel.

enter image description here
POSTED BY: Nasser M. Abbasi

After getting the gamma distribution plot, i am supposed to type the above command and then open the excel file named text.xls? but i am not getting it
POSTED BY: nirupama radhakrishnan
Reply to this discussion
Community posts can be styled and formatted using the Markdown syntax.
Tag limit exceeded
Note: Only the first five people you tag will receive an email notification; the other tagged names will appear as links to their profiles.
Reply Preview
Attachments
Remove
or Discard

Group Abstract Group Abstract