# DrawPoints: Graphic representation of points In VecStatGraphs2D: Vector Analysis using Graphical and Analytical Methods in 2D

## Description

This function creates a graph that represents one point for each vector. Each vector is moved to a common origin (0, 0) without changing its azimuth and module. The user can define how many points are classified as outliers (in red color). The outliers can be calculated by the higher value of the modules or the harmonic mean. For that, the module value or the harmonic mean value is calculated for each vector. Points with the largest module value or harmonic mean value will be considered as outliers.

## Usage

 `1` ```DrawPoints(data_x, data_y, PercentageOutliers = 5, SVGf=0) ```

## Arguments

 `data_x` Vector containing the values of the X coordinates `data_y` Vector containing the values of the Y coordinates `PercentageOutliers` Integer value that indicates the percentage of outliers. The default value is 5. `SVGf` Integer value. If SVGf = 0, the plot is showed only in the graphic window. If SVGf = 1, then the plot is saved as SVG graphic. The default value is 0.

## Details

Each vector is moved to a common origin (0, 0) without changing its azimuth and module. The graph represents the situation of the end nodes of the vectors.

One way to obtain a set of X and Y coordinates of the vectors is to use the `LoadData` function.

Typical usages are

 ```1 2 3 4``` ``` DrawPoints(data_x, data_y, \dots) DrawPoints(data_x, data_y, PercentageOutliers = 3, \dots) ...... ```

## Value

This function returns no value and creates a graph that represents the end nodes of the vectors.

## Author(s)

Ruiz-Cuetos, J.C., jcruizcue@gmail.com, Felicisimo, A.M., amfeli@unex.es, Cuartero, A., acuartero@unex.es, Polo, M.E., mepolo@unex.es, Rodriguez, P.G. pablogr@unex.es

## References

`DrawAzimuthDensity`, `DrawHistogram`, `DrawDistribution`, `DrawModuleAndAzimuthDistribution`, `DrawDensityMap`, `DrawVectors`.
 ```1 2 3 4 5``` ``` FileName<-system.file("data/RectangularData.txt", package="VecStatGraphs2D") dat<-LoadData(FileName, Type=2) X_coordinate<-dat[,3] Y_coordinate<-dat[,4] DrawPoints(X_coordinate, Y_coordinate, PercentageOutliers=8, SVGf=0) ```