Beefy Boxes and Bandwidth Generously Provided by pair Networks
good chemistry is complicated,
and a little bit messy -LW
 
PerlMonks  

Re^2: How does Math::GSL accept data?

by hda (Chaplain)
on May 21, 2009 at 17:22 UTC ( [id://765514]=note: print w/replies, xml ) Need Help??


in reply to Re: How does Math::GSL accept data?
in thread How does Math::GSL accept data?

Hi! thanks for your answer, but unfortunately I cannot make it to work. Here is the beggining of my data:

1 3 25 1 5 1 3 1 2 2 3 3 3 25 1 1 5 2 4500 1 1 1 1 5 5 8000 1 1 5 500 1 1 1 5 2 1 1 1000 1000 1000 1000 5000 1 25 6000 500 25 25 9000 1 1 5 1000 6000 25 10 5 5 5 5 1000 9540 1000 5 1 5 500 2500 2 5 5 5 ...

Is just a sequence of integers, stored in a plain text file called "data".

Now, this is my code:

my $fi = gsl_fopen('data', 'r'); my $fo = gsl_fopen('hist', 'w'); my $h = gsl_histogram_alloc(6); my $range = [ 1.0, 10.0, 100.0, 1000.0, 10000.0, 100000.0 ]; gsl_histogram_fread($fi, $h); gsl_histogram_set_ranges($h,$range,7); gsl_histogram_fprintf($fo, $h, "%3.1f", "%3.1f"); gsl_fclose($fo); gsl_fclose($fi);

What I need is to produce a histogram with 6 logarithmic bins (see the $range variable in the code). When I run this code I get no errors, and the result is:

1.0 10.0 0.0
10.0 100.0 0.0
100.0 1000.0 0.0
1000.0 10000.0 0.0
10000.0 100000.0 0.0
100000.0 0.0 0.0


So, either no data is read or something of what I have no idea is going on. In the documentation one finds:

gsl_histogram_fread($stream, $h) - This function reads into the histogram $h from the open stream $stream, which has been opened by the gsl_fopen function from the Math::GSL module, in binary format. The histogram $h must be preallocated with the correct size since the function uses the number of bins in $h to determine how many bytes to read. The return value is 0 for success and $GSL_EFAILED if there was a problem reading from the file. The data is assumed to have been written in the native binary format on the same architecture.

But I find it a bit complicated to understand if a text file can be read or not. Oh wise monks! any hint will be appreciated!

Replies are listed 'Best First'.
Re^3: How does Math::GSL accept data?
by Anonymous Monk on Aug 06, 2009 at 19:33 UTC
    Well, I don't know Perl, but I do know GSL. Statemens in your code are in a wrong order. 1) Allocate 6 bins gsl_histogram* h=gsl_histogram_alloc(6); 2) Set the ranges. 6 bins require 7 points. (you have 6) double ranges7={1.,2.,3.,4.,5.,6.,7.}; gsl_histogram_set_ranges(h,ranges,7); 3) And only after initialization one can use the histogram 4) In C one should free the histogram after using it. No idea about Perl.

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://765514]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others about the Monastery: (4)
As of 2024-05-23 13:48 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found