7) Using the provided vector below, provide R code that would produce three comma-separated values from the vector: the minimum, the median, and the maximum.This has to be generated programatically (you can not just calculate these values by hand and print out the corresponding vector).E.g for the vector c(1, 2, 3, 4, 5) the result will output "1, 3, 5". (2 pts)

```{r}

vector <- c(133.130219, 132.22319, 130.812653, 153.723282, 124.999298, 117.746117, 118.290627, 116.763412, 132.961868, 131.779541, 140.638748, 141.427536, 135.600342, 135.04184, 124.310944, 121.856476, 105.877823, 135.43721, 144.251053, 147.603439, 112.307724, 129.810013, 125.087288, 134.321198, 132.608734, 140.332169, 140.010818, 139.984406, 155.188583, 140.900116, 142.225311, 141.717285, 161.165863, 156.075058, 143.661835, 138.132843, 139.218826, 130.928864, 130.812302, 132.68721, 151.21312, 110.04641, 119.983032, 109.748711, 145.360672, 143.121918, 135.220978, 133.279465, 131.760971, 136.693756, 139.648239, 144.157669, 129.782883, 134.918777, 137.819733, 137.009018, 125.511147, 136.294083, 146.513687, 135.529999)

```