![\"Rmor](\"https:\/\/i0.wp.com\/ucanalytics.com\/blogs\/wp-content\/uploads\/2014\/05\/photo-1.jpg?resize=248%2C404\")
Rmor – by Roopam<\/p><\/div>\n
Analytics Lab – R<\/span><\/h2>\nWelcome back to Analytics Lab on YOU CANalytics! In our last article<\/a>, we learned the procedure to visualize risk across a parameter (age groups) in Excel. In this part we will generate the same visualization in R. This lab exercise is a part of the banking case study we have previously worked on (you will\u00a0find links to the banking case series at the bottom of this article).<\/p>\nBanking Case Study<\/span><\/h2>\nRecall the banking case: in that\u00a0you were playing the role of the Chief Risk Officer (CRO) for CyndiCat bank. The bank had disbursed 60816 auto loans in the quarter between April\u2013June 2012. Additionally, you had noticed around 2.5% of overall bad rate for these loans. The idea was to identify customer segments with distinct bad rates. Bad rate, by the way, is percentage of customer defaulted on their payments. You did some exploratory data analysis (EDA) using tools of data visualization and found a relationship between age with bad rates\u00a0(Part 1)<\/a>. If you recall, in the previous article<\/a> we have generated the following plot on Excel. The plot collectively depicts age groups wise population distribution and bad rate trend. As mentioned above this time we will create a similar plot on R. ![\"Presentation3\"](\"https:\/\/i0.wp.com\/ucanalytics.com\/blogs\/wp-content\/uploads\/2014\/05\/Presentation3.jpg?resize=602%2C361\")
<\/a><\/p>\nPep Talk before Jumping into R<\/span><\/h2>\nIf this is the first time you are using R & R studio then don’t get intimidated with this brilliant\u00a0tool for analysis – you will love it once you get familiar with it. R is a language and computing environment for statistics, analysis, data mining, and graphics.\u00a0<\/span>If you have used Excel functions (such as =vlookup(), =sum() etc.)\u00a0then you will find R commands \/ functions somewhat similar.<\/p>\nR & R Studio<\/span><\/h2>\nFirst of all (if you don’t have R and R Studio), you need to\u00a0download R (link<\/a>)\u00a0and\u00a0R Studio (link<\/a>) from the given links and install them on your computer. By the way R Studio is an excellent free editor to work with R language. You will\u00a0find good documentation for R Studio at this\u00a0link<\/a>. Additionally you will need the following CVS (data) file to work on this example.<\/p>\nYOU CANalytics R Visualization<\/a><\/span>\u00a0 <\/strong>(click on the link to download the file)<\/p>\nMoreover, you can\u00a0find the entire R code in the following text file. But wait and read on before you check out this text file.<\/p>\n
R Code – Visualization<\/a><\/strong><\/p>\nR Coding<\/span><\/h2>\nI recommend that you copy and paste the individual lines of code given below in R Studio console (located at the bottom left of R Studio panel as highlighted\u00a0in the below picture), and execute them one-by-one. In R (unlike C, Java, and other similar languages) one doesn’t need to compile the entire code to produce results – each command in R is executed independently.<\/p>\n
![\"R](\"https:\/\/i0.wp.com\/ucanalytics.com\/blogs\/wp-content\/uploads\/2014\/06\/R-Studio.jpg?resize=640%2C352\")
<\/a><\/p>\nThe first line of the code is importing or reading the CVS file in the R environment. You will need to modify the path of the CVS file based on the location of the file on your computer. The extracted CVS file is named ‘data’ in the R environment.<\/p>\n
data<-<\/strong> read.csv<\/strong><\/span>(\"C:\/Users\/Roopam\/Desktop\/YOU CANalytics Visualization R.csv<\/strong><\/span>\")<\/span><\/pre>\nNow in the next three lines of code we are going to assign variable names x, y1 and y2 to ‘Age Groups’, ‘Number of Loans’, and ‘Bad Rate’. These three variables are present in the ‘data’ file. Also, you could view this data in R using the command\u00a0View<\/span><\/strong>(data<\/span>)<\/p>\nx <- <\/strong>data<\/span>$<\/span>Age.Group<\/strong><\/span><\/span><\/pre>\ny1 <-<\/strong> data<\/span>$<\/span>Number.of.Loans<\/strong><\/span><\/span><\/pre>\ny2 <-<\/strong> data<\/span>$<\/span>Bad.Rate<\/strong><\/span><\/span><\/pre>\n‘Par’ function in R is used to realign plots. In this case mar operator is used to realign margins in the subsequent plot(s). You should play around with the numbers in the function to see the change in the plot, although you will see the impact of this command after you plot the bar plot through the next line of code. By changing the values inside ‘c()’ plots will move according to\u00a0c(bottom, left, top, right) on the graph canvas.<\/p>\n
par<\/strong><\/span>(mar <\/span>= c<\/span>(5,5,2,5) +.1)<\/span><\/pre>\nNow, we will plot our first bar plot using barplot function. Notice you could create a bare bones bar plot using this command\u00a0barplot<\/span>(y1<\/span>,\u00a0names.arg<\/span>=x<\/span>).\u00a0<\/strong>The other\u00a0arguments within the barplot function in the following command are used to produce cosmetic effects in the plot. I recommend that you play around with the other arguments in the barplot function.<\/p>\nbarplot<\/strong><\/span>(y1<\/span><\/strong>, col<\/span>=\"grey\", border<\/span>=0, names.arg<\/span>=x<\/span><\/strong>, angle<\/span>=45, xlab<\/span>=\"Age Groups<\/span><\/strong>\", ylab<\/span>=\"Number of Loans<\/strong><\/span>\", cex.lab<\/span>=1.7, cex.main<\/span>=1.7, cex.sub<\/span>=1.7, cex.axis<\/span>=1.2, cex.names<\/span>=1.2)\r\n<\/span><\/pre>\nThe following plot is generated using the above command. ![\"Rplot\"](\"https:\/\/i0.wp.com\/ucanalytics.com\/blogs\/wp-content\/uploads\/2014\/05\/Rplot.png?resize=640%2C392\")
<\/p>\n
Again we will use ‘par’ function to overlay a line plot on top of the bar plot. We will use the following command:<\/p>\n
par<\/strong><\/span>(new<\/span>=TRUE)\r\n<\/span><\/pre>\nNow, we will draw a line plot using the following command. This new plot will be overlaid on top of the previous bar plot because of the above par statement. In the plot command type=”l” argument tells R to draw a line graph, with orange color (col=”Orange”) \u00a0and thicker line width (lwd=5).<\/p>\n
plot<\/strong><\/span>(y2<\/span><\/strong>, type<\/span>=\"l<\/span>\", col<\/span>=\"Orange<\/span>\", lwd<\/span>=5, xlab<\/span>=\"\", ylab<\/span>=\"\", xaxt<\/span>=\"n\", yaxt<\/span>=\"n\")<\/span><\/pre>\nThe following plot will be generated using the above set of commands.
\n![\"Rplot01\"](\"https:\/\/i0.wp.com\/ucanalytics.com\/blogs\/wp-content\/uploads\/2014\/05\/Rplot01.png?resize=640%2C393\")
<\/a>
\nPenultimately, we need to format the new Y axis and label it “Bad Rate”. This is precisely what we are doing through the following two commands.<\/p>\naxis<\/strong><\/span>(4<\/span>, cex.axis<\/span>=1.2)<\/span><\/pre>\nmtext<\/strong><\/span>(\"Bad Rate<\/span><\/strong>\",side<\/span>=4, line<\/span>=3, cex<\/span>=1.7)\r\n<\/span><\/pre>\nThe result of the above two commands is labels for the Y axis for ‘Bad Rate’on the right as shown below.![\"Rplot03\"](\"https:\/\/i0.wp.com\/ucanalytics.com\/blogs\/wp-content\/uploads\/2014\/05\/Rplot03.png?resize=640%2C393\")
<\/a>Ultimately, we will place a legend on the top right corner of the graph to make it more friendly to read. We will do it using the legend function as shown below.<\/p>\nlegend<\/strong><\/span>(\"topright<\/span>\", col<\/span>=c<\/span>(\"orange\"), lty<\/span>=1, lwd<\/span>=5, legend<\/span>= c<\/span>(\"Bad Rate<\/span><\/strong>\"), cex<\/span>=1.25)<\/span><\/pre>\nThis has completed our exercise and we have the final plot that we were looking for.
\n![\"Rplot04\"](\"https:\/\/i0.wp.com\/ucanalytics.com\/blogs\/wp-content\/uploads\/2014\/05\/Rplot04.png?resize=640%2C393\")
<\/a><\/p>\nSign-off Note<\/span><\/h4>\nHope you had fun while creating the above plot on R. We will soon learn to do some more serious stuff on R as part of ‘Analytics Lab’. See you soon!<\/p>\n
The following are the parts of the banking case study for risk scoring<\/span><\/strong>\r\n- Part 1:\u00a0Data visualization for scoring<\/a><\/span>\r\n- Part 2:\u00a0Creating ratio variables for better scoring<\/a><\/span>\r\n- Part 3:\u00a0Logistic regression<\/a><\/span>\r\n- Part 4: Information Value and Weights of Evidence<\/a><\/span>\r\n- Part 5:\u00a0Reject inference<\/a><\/span>\r\n- Part 6:\u00a0Population stability index for scorecard monitoring<\/a><\/span><\/pre>\n","protected":false},"excerpt":{"rendered":"Analytics Lab – R Welcome back to Analytics Lab on YOU CANalytics! In our last article, we learned the procedure to visualize risk across a parameter (age groups) in Excel. In this part we will generate the same visualization in R. This lab exercise is a part of the banking case study we have previously<\/p>\n
Banking Case Study<\/span><\/h2>\nRecall the banking case: in that\u00a0you were playing the role of the Chief Risk Officer (CRO) for CyndiCat bank. The bank had disbursed 60816 auto loans in the quarter between April\u2013June 2012. Additionally, you had noticed around 2.5% of overall bad rate for these loans. The idea was to identify customer segments with distinct bad rates. Bad rate, by the way, is percentage of customer defaulted on their payments. You did some exploratory data analysis (EDA) using tools of data visualization and found a relationship between age with bad rates\u00a0(Part 1)<\/a>. If you recall, in the previous article<\/a> we have generated the following plot on Excel. The plot collectively depicts age groups wise population distribution and bad rate trend. As mentioned above this time we will create a similar plot on R. <\/a><\/p>\nPep Talk before Jumping into R<\/span><\/h2>\nIf this is the first time you are using R & R studio then don’t get intimidated with this brilliant\u00a0tool for analysis – you will love it once you get familiar with it. R is a language and computing environment for statistics, analysis, data mining, and graphics.\u00a0<\/span>If you have used Excel functions (such as =vlookup(), =sum() etc.)\u00a0then you will find R commands \/ functions somewhat similar.<\/p>\nR & R Studio<\/span><\/h2>\nFirst of all (if you don’t have R and R Studio), you need to\u00a0download R (link<\/a>)\u00a0and\u00a0R Studio (link<\/a>) from the given links and install them on your computer. By the way R Studio is an excellent free editor to work with R language. You will\u00a0find good documentation for R Studio at this\u00a0link<\/a>. Additionally you will need the following CVS (data) file to work on this example.<\/p>\nYOU CANalytics R Visualization<\/a><\/span>\u00a0 <\/strong>(click on the link to download the file)<\/p>\nMoreover, you can\u00a0find the entire R code in the following text file. But wait and read on before you check out this text file.<\/p>\n
R Code – Visualization<\/a><\/strong><\/p>\nR Coding<\/span><\/h2>\nI recommend that you copy and paste the individual lines of code given below in R Studio console (located at the bottom left of R Studio panel as highlighted\u00a0in the below picture), and execute them one-by-one. In R (unlike C, Java, and other similar languages) one doesn’t need to compile the entire code to produce results – each command in R is executed independently.<\/p>\n
<\/a><\/p>\nThe first line of the code is importing or reading the CVS file in the R environment. You will need to modify the path of the CVS file based on the location of the file on your computer. The extracted CVS file is named ‘data’ in the R environment.<\/p>\n
data<-<\/strong> read.csv<\/strong><\/span>(\"C:\/Users\/Roopam\/Desktop\/YOU CANalytics Visualization R.csv<\/strong><\/span>\")<\/span><\/pre>\nNow in the next three lines of code we are going to assign variable names x, y1 and y2 to ‘Age Groups’, ‘Number of Loans’, and ‘Bad Rate’. These three variables are present in the ‘data’ file. Also, you could view this data in R using the command\u00a0View<\/span><\/strong>(data<\/span>)<\/p>\nx <- <\/strong>data<\/span>$<\/span>Age.Group<\/strong><\/span><\/span><\/pre>\ny1 <-<\/strong> data<\/span>$<\/span>Number.of.Loans<\/strong><\/span><\/span><\/pre>\ny2 <-<\/strong> data<\/span>$<\/span>Bad.Rate<\/strong><\/span><\/span><\/pre>\n‘Par’ function in R is used to realign plots. In this case mar operator is used to realign margins in the subsequent plot(s). You should play around with the numbers in the function to see the change in the plot, although you will see the impact of this command after you plot the bar plot through the next line of code. By changing the values inside ‘c()’ plots will move according to\u00a0c(bottom, left, top, right) on the graph canvas.<\/p>\n
par<\/strong><\/span>(mar <\/span>= c<\/span>(5,5,2,5) +.1)<\/span><\/pre>\nNow, we will plot our first bar plot using barplot function. Notice you could create a bare bones bar plot using this command\u00a0barplot<\/span>(y1<\/span>,\u00a0names.arg<\/span>=x<\/span>).\u00a0<\/strong>The other\u00a0arguments within the barplot function in the following command are used to produce cosmetic effects in the plot. I recommend that you play around with the other arguments in the barplot function.<\/p>\nbarplot<\/strong><\/span>(y1<\/span><\/strong>, col<\/span>=\"grey\", border<\/span>=0, names.arg<\/span>=x<\/span><\/strong>, angle<\/span>=45, xlab<\/span>=\"Age Groups<\/span><\/strong>\", ylab<\/span>=\"Number of Loans<\/strong><\/span>\", cex.lab<\/span>=1.7, cex.main<\/span>=1.7, cex.sub<\/span>=1.7, cex.axis<\/span>=1.2, cex.names<\/span>=1.2)\r\n<\/span><\/pre>\nThe following plot is generated using the above command. <\/p>\n
Again we will use ‘par’ function to overlay a line plot on top of the bar plot. We will use the following command:<\/p>\n
par<\/strong><\/span>(new<\/span>=TRUE)\r\n<\/span><\/pre>\nNow, we will draw a line plot using the following command. This new plot will be overlaid on top of the previous bar plot because of the above par statement. In the plot command type=”l” argument tells R to draw a line graph, with orange color (col=”Orange”) \u00a0and thicker line width (lwd=5).<\/p>\n
plot<\/strong><\/span>(y2<\/span><\/strong>, type<\/span>=\"l<\/span>\", col<\/span>=\"Orange<\/span>\", lwd<\/span>=5, xlab<\/span>=\"\", ylab<\/span>=\"\", xaxt<\/span>=\"n\", yaxt<\/span>=\"n\")<\/span><\/pre>\nThe following plot will be generated using the above set of commands.
\n<\/a>
\nPenultimately, we need to format the new Y axis and label it “Bad Rate”. This is precisely what we are doing through the following two commands.<\/p>\naxis<\/strong><\/span>(4<\/span>, cex.axis<\/span>=1.2)<\/span><\/pre>\nmtext<\/strong><\/span>(\"Bad Rate<\/span><\/strong>\",side<\/span>=4, line<\/span>=3, cex<\/span>=1.7)\r\n<\/span><\/pre>\nThe result of the above two commands is labels for the Y axis for ‘Bad Rate’on the right as shown below.<\/a>Ultimately, we will place a legend on the top right corner of the graph to make it more friendly to read. We will do it using the legend function as shown below.<\/p>\nlegend<\/strong><\/span>(\"topright<\/span>\", col<\/span>=c<\/span>(\"orange\"), lty<\/span>=1, lwd<\/span>=5, legend<\/span>= c<\/span>(\"Bad Rate<\/span><\/strong>\"), cex<\/span>=1.25)<\/span><\/pre>\nThis has completed our exercise and we have the final plot that we were looking for.
\n<\/a><\/p>\nSign-off Note<\/span><\/h4>\nHope you had fun while creating the above plot on R. We will soon learn to do some more serious stuff on R as part of ‘Analytics Lab’. See you soon!<\/p>\n
The following are the parts of the banking case study for risk scoring<\/span><\/strong>\r\n- Part 1:\u00a0Data visualization for scoring<\/a><\/span>\r\n- Part 2:\u00a0Creating ratio variables for better scoring<\/a><\/span>\r\n- Part 3:\u00a0Logistic regression<\/a><\/span>\r\n- Part 4: Information Value and Weights of Evidence<\/a><\/span>\r\n- Part 5:\u00a0Reject inference<\/a><\/span>\r\n- Part 6:\u00a0Population stability index for scorecard monitoring<\/a><\/span><\/pre>\n","protected":false},"excerpt":{"rendered":"Analytics Lab – R Welcome back to Analytics Lab on YOU CANalytics! In our last article, we learned the procedure to visualize risk across a parameter (age groups) in Excel. In this part we will generate the same visualization in R. This lab exercise is a part of the banking case study we have previously<\/p>\n
<\/a><\/p>\nPep Talk before Jumping into R<\/span><\/h2>\nIf this is the first time you are using R & R studio then don’t get intimidated with this brilliant\u00a0tool for analysis – you will love it once you get familiar with it. R is a language and computing environment for statistics, analysis, data mining, and graphics.\u00a0<\/span>If you have used Excel functions (such as =vlookup(), =sum() etc.)\u00a0then you will find R commands \/ functions somewhat similar.<\/p>\nR & R Studio<\/span><\/h2>\nFirst of all (if you don’t have R and R Studio), you need to\u00a0download R (link<\/a>)\u00a0and\u00a0R Studio (link<\/a>) from the given links and install them on your computer. By the way R Studio is an excellent free editor to work with R language. You will\u00a0find good documentation for R Studio at this\u00a0link<\/a>. Additionally you will need the following CVS (data) file to work on this example.<\/p>\nYOU CANalytics R Visualization<\/a><\/span>\u00a0 <\/strong>(click on the link to download the file)<\/p>\nMoreover, you can\u00a0find the entire R code in the following text file. But wait and read on before you check out this text file.<\/p>\n
R Code – Visualization<\/a><\/strong><\/p>\nR Coding<\/span><\/h2>\nI recommend that you copy and paste the individual lines of code given below in R Studio console (located at the bottom left of R Studio panel as highlighted\u00a0in the below picture), and execute them one-by-one. In R (unlike C, Java, and other similar languages) one doesn’t need to compile the entire code to produce results – each command in R is executed independently.<\/p>\n
<\/a><\/p>\nThe first line of the code is importing or reading the CVS file in the R environment. You will need to modify the path of the CVS file based on the location of the file on your computer. The extracted CVS file is named ‘data’ in the R environment.<\/p>\n
data<-<\/strong> read.csv<\/strong><\/span>(\"C:\/Users\/Roopam\/Desktop\/YOU CANalytics Visualization R.csv<\/strong><\/span>\")<\/span><\/pre>\nNow in the next three lines of code we are going to assign variable names x, y1 and y2 to ‘Age Groups’, ‘Number of Loans’, and ‘Bad Rate’. These three variables are present in the ‘data’ file. Also, you could view this data in R using the command\u00a0View<\/span><\/strong>(data<\/span>)<\/p>\nx <- <\/strong>data<\/span>$<\/span>Age.Group<\/strong><\/span><\/span><\/pre>\ny1 <-<\/strong> data<\/span>$<\/span>Number.of.Loans<\/strong><\/span><\/span><\/pre>\ny2 <-<\/strong> data<\/span>$<\/span>Bad.Rate<\/strong><\/span><\/span><\/pre>\n‘Par’ function in R is used to realign plots. In this case mar operator is used to realign margins in the subsequent plot(s). You should play around with the numbers in the function to see the change in the plot, although you will see the impact of this command after you plot the bar plot through the next line of code. By changing the values inside ‘c()’ plots will move according to\u00a0c(bottom, left, top, right) on the graph canvas.<\/p>\n
par<\/strong><\/span>(mar <\/span>= c<\/span>(5,5,2,5) +.1)<\/span><\/pre>\nNow, we will plot our first bar plot using barplot function. Notice you could create a bare bones bar plot using this command\u00a0barplot<\/span>(y1<\/span>,\u00a0names.arg<\/span>=x<\/span>).\u00a0<\/strong>The other\u00a0arguments within the barplot function in the following command are used to produce cosmetic effects in the plot. I recommend that you play around with the other arguments in the barplot function.<\/p>\nbarplot<\/strong><\/span>(y1<\/span><\/strong>, col<\/span>=\"grey\", border<\/span>=0, names.arg<\/span>=x<\/span><\/strong>, angle<\/span>=45, xlab<\/span>=\"Age Groups<\/span><\/strong>\", ylab<\/span>=\"Number of Loans<\/strong><\/span>\", cex.lab<\/span>=1.7, cex.main<\/span>=1.7, cex.sub<\/span>=1.7, cex.axis<\/span>=1.2, cex.names<\/span>=1.2)\r\n<\/span><\/pre>\nThe following plot is generated using the above command. <\/p>\n
Again we will use ‘par’ function to overlay a line plot on top of the bar plot. We will use the following command:<\/p>\n
par<\/strong><\/span>(new<\/span>=TRUE)\r\n<\/span><\/pre>\nNow, we will draw a line plot using the following command. This new plot will be overlaid on top of the previous bar plot because of the above par statement. In the plot command type=”l” argument tells R to draw a line graph, with orange color (col=”Orange”) \u00a0and thicker line width (lwd=5).<\/p>\n
plot<\/strong><\/span>(y2<\/span><\/strong>, type<\/span>=\"l<\/span>\", col<\/span>=\"Orange<\/span>\", lwd<\/span>=5, xlab<\/span>=\"\", ylab<\/span>=\"\", xaxt<\/span>=\"n\", yaxt<\/span>=\"n\")<\/span><\/pre>\nThe following plot will be generated using the above set of commands.
\n<\/a>
\nPenultimately, we need to format the new Y axis and label it “Bad Rate”. This is precisely what we are doing through the following two commands.<\/p>\naxis<\/strong><\/span>(4<\/span>, cex.axis<\/span>=1.2)<\/span><\/pre>\nmtext<\/strong><\/span>(\"Bad Rate<\/span><\/strong>\",side<\/span>=4, line<\/span>=3, cex<\/span>=1.7)\r\n<\/span><\/pre>\nThe result of the above two commands is labels for the Y axis for ‘Bad Rate’on the right as shown below.<\/a>Ultimately, we will place a legend on the top right corner of the graph to make it more friendly to read. We will do it using the legend function as shown below.<\/p>\nlegend<\/strong><\/span>(\"topright<\/span>\", col<\/span>=c<\/span>(\"orange\"), lty<\/span>=1, lwd<\/span>=5, legend<\/span>= c<\/span>(\"Bad Rate<\/span><\/strong>\"), cex<\/span>=1.25)<\/span><\/pre>\nThis has completed our exercise and we have the final plot that we were looking for.
\n<\/a><\/p>\nSign-off Note<\/span><\/h4>\nHope you had fun while creating the above plot on R. We will soon learn to do some more serious stuff on R as part of ‘Analytics Lab’. See you soon!<\/p>\n
The following are the parts of the banking case study for risk scoring<\/span><\/strong>\r\n- Part 1:\u00a0Data visualization for scoring<\/a><\/span>\r\n- Part 2:\u00a0Creating ratio variables for better scoring<\/a><\/span>\r\n- Part 3:\u00a0Logistic regression<\/a><\/span>\r\n- Part 4: Information Value and Weights of Evidence<\/a><\/span>\r\n- Part 5:\u00a0Reject inference<\/a><\/span>\r\n- Part 6:\u00a0Population stability index for scorecard monitoring<\/a><\/span><\/pre>\n","protected":false},"excerpt":{"rendered":"Analytics Lab – R Welcome back to Analytics Lab on YOU CANalytics! In our last article, we learned the procedure to visualize risk across a parameter (age groups) in Excel. In this part we will generate the same visualization in R. This lab exercise is a part of the banking case study we have previously<\/p>\n
R & R Studio<\/span><\/h2>\nFirst of all (if you don’t have R and R Studio), you need to\u00a0download R (link<\/a>)\u00a0and\u00a0R Studio (link<\/a>) from the given links and install them on your computer. By the way R Studio is an excellent free editor to work with R language. You will\u00a0find good documentation for R Studio at this\u00a0link<\/a>. Additionally you will need the following CVS (data) file to work on this example.<\/p>\nYOU CANalytics R Visualization<\/a><\/span>\u00a0 <\/strong>(click on the link to download the file)<\/p>\nMoreover, you can\u00a0find the entire R code in the following text file. But wait and read on before you check out this text file.<\/p>\n
R Code – Visualization<\/a><\/strong><\/p>\nR Coding<\/span><\/h2>\nI recommend that you copy and paste the individual lines of code given below in R Studio console (located at the bottom left of R Studio panel as highlighted\u00a0in the below picture), and execute them one-by-one. In R (unlike C, Java, and other similar languages) one doesn’t need to compile the entire code to produce results – each command in R is executed independently.<\/p>\n
<\/a><\/p>\nThe first line of the code is importing or reading the CVS file in the R environment. You will need to modify the path of the CVS file based on the location of the file on your computer. The extracted CVS file is named ‘data’ in the R environment.<\/p>\n
data<-<\/strong> read.csv<\/strong><\/span>(\"C:\/Users\/Roopam\/Desktop\/YOU CANalytics Visualization R.csv<\/strong><\/span>\")<\/span><\/pre>\nNow in the next three lines of code we are going to assign variable names x, y1 and y2 to ‘Age Groups’, ‘Number of Loans’, and ‘Bad Rate’. These three variables are present in the ‘data’ file. Also, you could view this data in R using the command\u00a0View<\/span><\/strong>(data<\/span>)<\/p>\nx <- <\/strong>data<\/span>$<\/span>Age.Group<\/strong><\/span><\/span><\/pre>\ny1 <-<\/strong> data<\/span>$<\/span>Number.of.Loans<\/strong><\/span><\/span><\/pre>\ny2 <-<\/strong> data<\/span>$<\/span>Bad.Rate<\/strong><\/span><\/span><\/pre>\n‘Par’ function in R is used to realign plots. In this case mar operator is used to realign margins in the subsequent plot(s). You should play around with the numbers in the function to see the change in the plot, although you will see the impact of this command after you plot the bar plot through the next line of code. By changing the values inside ‘c()’ plots will move according to\u00a0c(bottom, left, top, right) on the graph canvas.<\/p>\n
par<\/strong><\/span>(mar <\/span>= c<\/span>(5,5,2,5) +.1)<\/span><\/pre>\nNow, we will plot our first bar plot using barplot function. Notice you could create a bare bones bar plot using this command\u00a0barplot<\/span>(y1<\/span>,\u00a0names.arg<\/span>=x<\/span>).\u00a0<\/strong>The other\u00a0arguments within the barplot function in the following command are used to produce cosmetic effects in the plot. I recommend that you play around with the other arguments in the barplot function.<\/p>\nbarplot<\/strong><\/span>(y1<\/span><\/strong>, col<\/span>=\"grey\", border<\/span>=0, names.arg<\/span>=x<\/span><\/strong>, angle<\/span>=45, xlab<\/span>=\"Age Groups<\/span><\/strong>\", ylab<\/span>=\"Number of Loans<\/strong><\/span>\", cex.lab<\/span>=1.7, cex.main<\/span>=1.7, cex.sub<\/span>=1.7, cex.axis<\/span>=1.2, cex.names<\/span>=1.2)\r\n<\/span><\/pre>\nThe following plot is generated using the above command. <\/p>\n
Again we will use ‘par’ function to overlay a line plot on top of the bar plot. We will use the following command:<\/p>\n
par<\/strong><\/span>(new<\/span>=TRUE)\r\n<\/span><\/pre>\nNow, we will draw a line plot using the following command. This new plot will be overlaid on top of the previous bar plot because of the above par statement. In the plot command type=”l” argument tells R to draw a line graph, with orange color (col=”Orange”) \u00a0and thicker line width (lwd=5).<\/p>\n
plot<\/strong><\/span>(y2<\/span><\/strong>, type<\/span>=\"l<\/span>\", col<\/span>=\"Orange<\/span>\", lwd<\/span>=5, xlab<\/span>=\"\", ylab<\/span>=\"\", xaxt<\/span>=\"n\", yaxt<\/span>=\"n\")<\/span><\/pre>\nThe following plot will be generated using the above set of commands.
\n<\/a>
\nPenultimately, we need to format the new Y axis and label it “Bad Rate”. This is precisely what we are doing through the following two commands.<\/p>\naxis<\/strong><\/span>(4<\/span>, cex.axis<\/span>=1.2)<\/span><\/pre>\nmtext<\/strong><\/span>(\"Bad Rate<\/span><\/strong>\",side<\/span>=4, line<\/span>=3, cex<\/span>=1.7)\r\n<\/span><\/pre>\nThe result of the above two commands is labels for the Y axis for ‘Bad Rate’on the right as shown below.<\/a>Ultimately, we will place a legend on the top right corner of the graph to make it more friendly to read. We will do it using the legend function as shown below.<\/p>\nlegend<\/strong><\/span>(\"topright<\/span>\", col<\/span>=c<\/span>(\"orange\"), lty<\/span>=1, lwd<\/span>=5, legend<\/span>= c<\/span>(\"Bad Rate<\/span><\/strong>\"), cex<\/span>=1.25)<\/span><\/pre>\nThis has completed our exercise and we have the final plot that we were looking for.
\n<\/a><\/p>\nSign-off Note<\/span><\/h4>\nHope you had fun while creating the above plot on R. We will soon learn to do some more serious stuff on R as part of ‘Analytics Lab’. See you soon!<\/p>\n
The following are the parts of the banking case study for risk scoring<\/span><\/strong>\r\n- Part 1:\u00a0Data visualization for scoring<\/a><\/span>\r\n- Part 2:\u00a0Creating ratio variables for better scoring<\/a><\/span>\r\n- Part 3:\u00a0Logistic regression<\/a><\/span>\r\n- Part 4: Information Value and Weights of Evidence<\/a><\/span>\r\n- Part 5:\u00a0Reject inference<\/a><\/span>\r\n- Part 6:\u00a0Population stability index for scorecard monitoring<\/a><\/span><\/pre>\n","protected":false},"excerpt":{"rendered":"Analytics Lab – R Welcome back to Analytics Lab on YOU CANalytics! In our last article, we learned the procedure to visualize risk across a parameter (age groups) in Excel. In this part we will generate the same visualization in R. This lab exercise is a part of the banking case study we have previously<\/p>\n
YOU CANalytics R Visualization<\/a><\/span>\u00a0 <\/strong>(click on the link to download the file)<\/p>\n Moreover, you can\u00a0find the entire R code in the following text file. But wait and read on before you check out this text file.<\/p>\n R Code – Visualization<\/a><\/strong><\/p>\n I recommend that you copy and paste the individual lines of code given below in R Studio console (located at the bottom left of R Studio panel as highlighted\u00a0in the below picture), and execute them one-by-one. In R (unlike C, Java, and other similar languages) one doesn’t need to compile the entire code to produce results – each command in R is executed independently.<\/p>\n The first line of the code is importing or reading the CVS file in the R environment. You will need to modify the path of the CVS file based on the location of the file on your computer. The extracted CVS file is named ‘data’ in the R environment.<\/p>\n Now in the next three lines of code we are going to assign variable names x, y1 and y2 to ‘Age Groups’, ‘Number of Loans’, and ‘Bad Rate’. These three variables are present in the ‘data’ file. Also, you could view this data in R using the command\u00a0View<\/span><\/strong>(data<\/span>)<\/p>\n ‘Par’ function in R is used to realign plots. In this case mar operator is used to realign margins in the subsequent plot(s). You should play around with the numbers in the function to see the change in the plot, although you will see the impact of this command after you plot the bar plot through the next line of code. By changing the values inside ‘c()’ plots will move according to\u00a0c(bottom, left, top, right) on the graph canvas.<\/p>\n Now, we will plot our first bar plot using barplot function. Notice you could create a bare bones bar plot using this command\u00a0barplot<\/span>(y1<\/span>,\u00a0names.arg<\/span>=x<\/span>).\u00a0<\/strong>The other\u00a0arguments within the barplot function in the following command are used to produce cosmetic effects in the plot. I recommend that you play around with the other arguments in the barplot function.<\/p>\n The following plot is generated using the above command. Again we will use ‘par’ function to overlay a line plot on top of the bar plot. We will use the following command:<\/p>\n Now, we will draw a line plot using the following command. This new plot will be overlaid on top of the previous bar plot because of the above par statement. In the plot command type=”l” argument tells R to draw a line graph, with orange color (col=”Orange”) \u00a0and thicker line width (lwd=5).<\/p>\n The following plot will be generated using the above set of commands. The result of the above two commands is labels for the Y axis for ‘Bad Rate’on the right as shown below. This has completed our exercise and we have the final plot that we were looking for. Hope you had fun while creating the above plot on R. We will soon learn to do some more serious stuff on R as part of ‘Analytics Lab’. See you soon!<\/p>\n Analytics Lab – R Welcome back to Analytics Lab on YOU CANalytics! In our last article, we learned the procedure to visualize risk across a parameter (age groups) in Excel. In this part we will generate the same visualization in R. This lab exercise is a part of the banking case study we have previously<\/p>\nR Coding<\/span><\/h2>\n
<\/a><\/p>\ndata<-<\/strong> read.csv<\/strong><\/span>(\"C:\/Users\/Roopam\/Desktop\/YOU CANalytics Visualization R.csv<\/strong><\/span>\")<\/span><\/pre>\nx <- <\/strong>data<\/span>$<\/span>Age.Group<\/strong><\/span><\/span><\/pre>\ny1 <-<\/strong> data<\/span>$<\/span>Number.of.Loans<\/strong><\/span><\/span><\/pre>\ny2 <-<\/strong> data<\/span>$<\/span>Bad.Rate<\/strong><\/span><\/span><\/pre>\npar<\/strong><\/span>(mar <\/span>= c<\/span>(5,5,2,5) +.1)<\/span><\/pre>\nbarplot<\/strong><\/span>(y1<\/span><\/strong>, col<\/span>=\"grey\", border<\/span>=0, names.arg<\/span>=x<\/span><\/strong>, angle<\/span>=45, xlab<\/span>=\"Age Groups<\/span><\/strong>\", ylab<\/span>=\"Number of Loans<\/strong><\/span>\", cex.lab<\/span>=1.7, cex.main<\/span>=1.7, cex.sub<\/span>=1.7, cex.axis<\/span>=1.2, cex.names<\/span>=1.2)\r\n<\/span><\/pre>\n<\/p>\npar<\/strong><\/span>(new<\/span>=TRUE)\r\n<\/span><\/pre>\nplot<\/strong><\/span>(y2<\/span><\/strong>, type<\/span>=\"l<\/span>\", col<\/span>=\"Orange<\/span>\", lwd<\/span>=5, xlab<\/span>=\"\", ylab<\/span>=\"\", xaxt<\/span>=\"n\", yaxt<\/span>=\"n\")<\/span><\/pre>\n
\n<\/a>
\nPenultimately, we need to format the new Y axis and label it “Bad Rate”. This is precisely what we are doing through the following two commands.<\/p>\naxis<\/strong><\/span>(4<\/span>, cex.axis<\/span>=1.2)<\/span><\/pre>\nmtext<\/strong><\/span>(\"Bad Rate<\/span><\/strong>\",side<\/span>=4, line<\/span>=3, cex<\/span>=1.7)\r\n<\/span><\/pre>\n<\/a>Ultimately, we will place a legend on the top right corner of the graph to make it more friendly to read. We will do it using the legend function as shown below.<\/p>\nlegend<\/strong><\/span>(\"topright<\/span>\", col<\/span>=c<\/span>(\"orange\"), lty<\/span>=1, lwd<\/span>=5, legend<\/span>= c<\/span>(\"Bad Rate<\/span><\/strong>\"), cex<\/span>=1.25)<\/span><\/pre>\n
\n<\/a><\/p>\nSign-off Note<\/span><\/h4>\n
The following are the parts of the banking case study for risk scoring<\/span><\/strong>\r\n- Part 1:\u00a0Data visualization for scoring<\/a><\/span>\r\n- Part 2:\u00a0Creating ratio variables for better scoring<\/a><\/span>\r\n- Part 3:\u00a0Logistic regression<\/a><\/span>\r\n- Part 4: Information Value and Weights of Evidence<\/a><\/span>\r\n- Part 5:\u00a0Reject inference<\/a><\/span>\r\n- Part 6:\u00a0Population stability index for scorecard monitoring<\/a><\/span><\/pre>\n","protected":false},"excerpt":{"rendered":"