# DrawVectors: Graphic representation of the vectors In VecStatGraphs2D: Vector Analysis using Graphical and Analytical Methods in 2D

## Description

This function creates a graph that shows an arrow for each vector. The graph represents the situation of every vector by its coordinates. To represent this graph, the input data must be the cartesian coordinates (Type = 1).

## Usage

 `1` ```DrawVectors(data, SVGf=0) ```

## Arguments

 `data` Matrix containing the coordinates of the final and initial data `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

The cartesian coordinates cannot be calculated. They must be introduced as input data, although it is advisable to use `LoadData` for obtain the vectors of the X and Y coordinates as well as the azimuths of the final values.

## Value

This function returns no value and creates a graph that represents the vectors of the input data.

## Author(s)

Ruiz-Cuetos, J.C., [email protected], Felicisimo, A.M., [email protected], Cuartero, A., [email protected], Polo, M.E., [email protected], Rodriguez, P.G. [email protected]

## References

`DrawAzimuthDensity`, `DrawHistogram`, `DrawDistribution`, `DrawPoints`, `DrawModuleAndAzimuthDistribution`, `DrawDensityMap`.
 ``` 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39``` ``` FileName<-system.file("data/MeasuredRealData.1.txt", package="VecStatGraphs2D") dat<-LoadData(FileName, Type=1) data<-dat[,1:8] DrawVectors(data, SVGf=0) FileName<-system.file("data/datos1.1.txt", package="VecStatGraphs2D") dat<-LoadData(FileName, Type=1) data<-dat[,1:8] DrawVectors(data, SVGf=0) FileName<-system.file("data/datos2.1.txt", package="VecStatGraphs2D") dat<-LoadData(FileName, Type=1) data<-dat[,1:8] DrawVectors(data, SVGf=0) FileName<-system.file("data/datos3.1.txt", package="VecStatGraphs2D") dat<-LoadData(FileName, Type=1) data<-dat[,1:8] DrawVectors(data, SVGf=0) FileName<-system.file("data/datos4.1.txt", package="VecStatGraphs2D") dat<-LoadData(FileName, Type=1) data<-dat[,1:8] DrawVectors(data, SVGf=0) FileName<-system.file("data/datos1050.1.txt", package="VecStatGraphs2D") dat<-LoadData(FileName, Type=1) data<-dat[,1:8] DrawVectors(data, SVGf=0) FileName<-system.file("data/masdatos.1.txt", package="VecStatGraphs2D") dat<-LoadData(FileName, Type=1) data<-dat[,1:8] DrawVectors(data, SVGf=0) FileName<-system.file("data/simple.1.txt", package="VecStatGraphs2D") dat<-LoadData(FileName, Type=1) data<-dat[,1:8] DrawVectors(data, SVGf=0) ```