plot(3f) - [M_datapac:GENERIC_LINE_PLOT] yields a one-page printer plot of Y(I) versus X(I)
Synopsis
Description
Options
Examples
Author
Maintainer
License
Subroutine plot (X, Y, N)
Real(kind=wp) :: (In) :: X(:) Real(kind=wp) :: (In) :: Y(:) Integer, Intent (In) :: N
This subroutine yields a one-page printer plot of Y(I) versus X(I).Values in the vertical axis vector (Y) or the horizontal axis vector (X) which are equal to or in excess of 10.0**10 will not be plotted.
This convention greatly simplifies the problem of plotting when some elements in the vector Y (or X) are missing data, or when we purposely want to ignore certain elements in the vector Y (or X) for plotting purposes (That is, we do not want certain elements in Y (or X) to be plotted). To cause specific elements in Y (or X) to be ignored, we replace the elements beforehand (by, for example, use of the REPLAC subroutine) by some large value (like, say, 10.0**10) and they will subsequently be ignored in the plot subroutine.
Y The REAL vector of (unsorted or sorted) observations to be plotted vertically. X The REAL vector of (unsorted or sorted) observations to be plotted horizontally. N The integer number of observations in the vector Y.
Sample program:
program demo_plot use M_datapac, only : plot implicit none integer :: i real, allocatable :: x(:), y(:) x=[(real(i),i=1,30)] y=0.075*(x**4)-0.525*(x**3)+0.75*(x**2)+2.40 call plot(x,y,size(x)) y=[(real(i)/10.0,i=1,30)] x=y**3.78-6*y**2.52+9*y**1.26 call plot(x,y,size(x)) end program demo_plotResults:
The original DATAPAC library was written by James Filliben of the Statistical Engineering Division, National Institute of Standards and Technology.
John Urban, 2022.05.31
CC0-1.0
Nemo Release 3.1 | plot (3) | February 23, 2025 |