Muestras de tipo LINEAL:

x <- c( 10.3 , 10.8 , 14.6 , 14.9 , 15.4 , 16.0 , 16.1 , 17.6 , 18.0 , 19.5 )
y <- c( 47.4 , 50.3 , 58.0 , 55.8 , 58.3 , 60.6 , 61.8 , 64.2 , 61.5 , 67.2 )
n <- length(x)


x <- c( 10.6 , 11.4 , 13.1 , 13.9 , 15.6 , 17.9 , 18.2 , 18.5 , 18.8 )
y <- c( 64.7 , 69.9 , 73.1 , 78.4 , 85.3 , 92.6 , 93.6 , 93.5 , 95.5 )
n <- length(x)


x <- c( 10.3 , 11.2 , 11.5 , 11.6 , 11.7 , 13.9 , 14.6 , 15.0 , 16.5 , 16.7 , 19.4 , 19.6 )
y <- c( 62.0 , 63.9 , 66.5 , 68.1 , 64.6 , 73.6 , 73.9 , 75.6 , 79.8 , 80.9 , 87.7 , 89.0 )
n <- length(x)


x <- c( 10.1 , 10.6 , 13.3 , 13.7 , 13.9 , 15.3 , 17.1 , 19.7 , 19.8 )
y <- c( 43.3 , 43.1 , 48.5 , 48.2 , 52.7 , 56.8 , 58.6 , 60.7 , 60.7 )
n <- length(x)


x <- c( 10.0 , 11.2 , 13.4 , 13.9 , 14.7 , 14.8 , 15.5 , 16.2 , 17.7 , 19.5 , 19.6 , 19.8 )
y <- c( 60.6 , 63.0 , 73.9 , 74.7 , 75.9 , 76.3 , 79.6 , 80.5 , 86.4 , 91.9 , 89.8 , 92.1 )
n <- length(x)



Muestras de tipo EXPONENCIAL:

x <- c( 10.3 , 11.1 , 13.1 , 14.0 , 16.2 , 16.3 , 17.1 , 17.3 , 17.5 , 17.9 , 19.5 , 19.6 )
y <- c( 3.3 , 3.1 , 3.0 , 2.7 , 2.6 , 2.6 , 2.5 , 2.4 , 2.4 , 2.3 , 2.3 , 2.2 )
n <- length(x)


x <- c( 11.0 , 13.0 , 13.9 , 14.7 , 14.9 , 15.9 , 16.0 , 16.6 , 16.8 , 18.3 , 19.4 , 19.9 )
y <- c( 0.5 , 0.4 , 0.3 , 0.3 , 0.3 , 0.3 , 0.2 , 0.1 , 0.1 , 0.1 , 0.0 , 0.0 )
n <- length(x)


x <- c( 10.9 , 11.8 , 12.9 , 13.8 , 15.9 , 17.4 , 19.4 , 19.7 )
y <- c( 1.5 , 1.3 , 1.0 , 0.9 , 0.9 , 0.7 , 0.5 , 0.4 )
n <- length(x)


x <- c( 10.9 , 11.3 , 12.8 , 15.0 , 15.1 , 16.4 , 16.6 , 17.6 )
y <- c( 2.3 , 2.3 , 2.1 , 1.9 , 1.9 , 1.8 , 1.7 , 1.4 )
n <- length(x)


x <- c( 10.0 , 11.2 , 13.0 , 13.4 , 13.7 , 14.3 , 14.5 , 16.1 , 17.0 , 19.6 )
y <- c( 0.8 , 0.7 , 0.4 , 0.3 , 0.2 , 0.2 , 0.2 , 0.2 , 0.1 , 0.1 )
n <- length(x)



Muestras de tipo POTENCIAL:

x <- c( 2.25 , 3.35 , 3.46 , 3.70 , 3.81 , 4.29 , 4.61 , 5.10 , 7.25 , 7.47 , 8.51 , 8.93 )
y <- c( 16.84 ,  43.93 ,  47.51 ,  61.32 ,  66.24 ,  85.72 ,  94.11 , 118.30 , 229.25 , 245.90 , 322.11 , 359.52 )
n <- length(x)


x <- c( 1.16 , 1.28 , 3.07 , 3.64 , 4.96 , 5.00 , 5.21 , 6.53 , 8.71 , 8.88 )
y <- c( 0.26 ,  8.60 ,  148.72 ,  263.12 ,  719.10 ,  736.31 ,  839.29 , 1760.09 , 4500.15 , 4790.28 )
n <- length(x)


x <- c( 1.44 , 2.08 , 3.19 , 3.49 , 3.91 , 4.24 , 4.45 , 5.75 , 7.02 , 7.40 )
y <- c( 2.71 ,  24.04 ,  82.21 , 112.09 , 146.24 , 192.66 , 211.88 , 401.99 , 694.42 , 815.82 )
n <- length(x)


x <- c( 1.18 , 2.58 , 3.43 , 4.61 , 5.79 , 5.81 , 6.24 , 7.05 , 7.46 , 8.71 , 8.89 )
y <- c( 8.40 ,  44.66 ,  66.32 , 148.39 , 251.96 , 254.33 , 315.44 , 408.47 , 476.19 , 691.54 , 712.07 )
n <- length(x)


x <- c( 1.13 , 1.16 , 3.02 , 3.20 , 5.12 , 7.10 , 8.31 , 8.38 )
y <- c( 7.62 ,  13.81 ,  22.88 ,  27.13 ,  42.92 ,  88.42 , 103.15 , 111.87 )
n <- length(x)



Muestras de tipo HIPERBÓLICO:

x <- c( 26.99 , 34.49 , 43.89 , 50.45 , 55.60 , 66.45 , 96.07 )
y <- c( 33.41 , 32.42 , 31.74 , 31.16 , 31.12 , 30.53 , 29.18 )
n <- length(x)


x <- c( 8.96 , 22.83 , 26.00 , 37.60 , 41.92 , 75.74 , 78.01 , 83.93 , 96.93 )
y <- c( 42.50 , 32.27 , 32.15 , 30.68 , 30.02 , 29.97 , 29.19 , 28.08 , 27.18 )
n <- length(x)


x <- c( 5.70 , 11.02 , 19.99 , 75.25 , 96.32 , 99.11 )
y <- c( 46.04 , 34.11 , 28.78 , 27.19 , 24.88 , 24.47 )
n <- length(x)


x <- c( 5.05 , 15.93 , 16.90 , 26.69 , 40.15 , 50.64 , 55.42 , 61.45 , 94.13 )
y <- c( 64.74 , 36.78 , 35.91 , 32.24 , 28.89 , 28.81 , 28.78 , 28.27 , 28.09 )
n <- length(x)


x <- c( 43.95 , 46.13 , 46.49 , 60.60 , 70.83 , 80.31 , 83.26 )
y <- c( 27.78 , 27.20 , 25.96 , 25.87 , 25.17 , 24.93 , 24.70 )
n <- length(x)