Lopamudra Satpathy
4/27/2018
Nuclear power is the world's second largest source of low-carbon power . After 1950, peaceful use of nuclear fission turned the attention of global community. Nuclear power plants are operational in 30 countries worldwide. Around 11% of electricity is generated by 450 nuclear power reactors till date.
Main parts of Nuclear powerplant:
Dataset : The nuclear data frame has 32 rows and 11 columns. The data relate to the construction of 32 light water reactor (LWR) plants constructed in the U.S.A in the late 1960's and early 1970's. The data was collected with the aim of predicting the cost of construction of further LWR plants. 6 of the power plants had partial turnkey guarantees and it is possible that, for these plants, some manufacturers' subsidies may be hidden in the quoted capital costs.
This data frame contains the following columns:
url <- "https://vincentarelbundock.github.io/Rdatasets/csv/boot/nuclear.csv"
nuclearPPC <- read.csv(url, header = TRUE)
summary(nuclearPPC)
X cost date t1
Min. : 1.00 Min. :207.5 Min. :67.17 Min. : 7.00
1st Qu.: 8.75 1st Qu.:310.3 1st Qu.:67.90 1st Qu.:11.75
Median :16.50 Median :448.1 Median :68.42 Median :13.00
Mean :16.50 Mean :461.6 Mean :68.58 Mean :13.75
3rd Qu.:24.25 3rd Qu.:612.0 3rd Qu.:68.92 3rd Qu.:15.25
Max. :32.00 Max. :881.2 Max. :71.08 Max. :22.00
t2 cap pr ne
Min. :44.00 Min. : 457.0 Min. :0.0000 Min. :0.00
1st Qu.:56.50 1st Qu.: 745.0 1st Qu.:0.0000 1st Qu.:0.00
Median :62.50 Median : 822.0 Median :0.0000 Median :0.00
Mean :62.38 Mean : 825.4 Mean :0.3125 Mean :0.25
3rd Qu.:70.25 3rd Qu.: 947.2 3rd Qu.:1.0000 3rd Qu.:0.25
Max. :85.00 Max. :1130.0 Max. :1.0000 Max. :1.00
ct bw cum.n pt
Min. :0.0000 Min. :0.0000 Min. : 1.000 Min. :0.0000
1st Qu.:0.0000 1st Qu.:0.0000 1st Qu.: 3.000 1st Qu.:0.0000
Median :0.0000 Median :0.0000 Median : 7.500 Median :0.0000
Mean :0.4062 Mean :0.1875 Mean : 8.531 Mean :0.1875
3rd Qu.:1.0000 3rd Qu.:0.0000 3rd Qu.:12.500 3rd Qu.:0.0000
Max. :1.0000 Max. :1.0000 Max. :21.000 Max. :1.0000
library(ggplot2)
ggplot(nuclearPPC, aes(cost,cap + ct +bw , color = bw))+
geom_point()