This is an R Markdown document. Markdown is a simple formatting syntax for authoring HTML, PDF, and MS Word documents. For more details on using R Markdown see http://rmarkdown.rstudio.com.
When you click the Knit button a document will be generated that includes both content as well as the output of any embedded R code chunks within the document. You can embed an R code chunk like this:
Erica<-read.csv("Erica.csv", row.names=1, header=TRUE)
attach(Erica)
summary(Erica)
## sales potential chair perform
## Min. : 2.00 Min. : 22.00 Min. : 1.00 Min. :0.0000
## 1st Qu.: 16.00 1st Qu.: 44.00 1st Qu.: 2.00 1st Qu.:0.4000
## Median : 23.00 Median : 44.00 Median : 2.00 Median :0.6000
## Mean : 34.19 Mean : 57.86 Mean : 2.63 Mean :0.5877
## 3rd Qu.: 37.00 3rd Qu.: 66.00 3rd Qu.: 3.00 3rd Qu.:0.7000
## Max. :195.00 Max. :308.00 Max. :14.00 Max. :1.7000
## group
## Defend :12
## Focus :26
## Low Maintain: 4
## Protect :31
##
##
## limit for x and y axis
x=1.5
y=200
plot(x=perform, y=potential, pch=18, col="red", ylim=c(0,y),xlim=c(0,x), xlab="% of actual sales vs potential", ylab="Potential in $1000")
text(x=perform, y=potential, labels=row.names(Erica), cex=0.65)
## 35 is based on 1.6 chair practice
abline(h=35, lty=3, col="blue")
abline(v=0.5, lty=3, col="blue")
text(x-0.13,y-3,"Protect", cex=2, col="Green")
text(x-0.15, 4,"Maintain", cex=2, col="Green")
text(0.1,y-3,"Focus", cex=2, col="Green")
text(0.1, 4,"Ignore", cex=2, col="Green")
Erica
## sales potential chair perform group
## BAR803 23 22 1 1.1 Defend
## BIS350 18 22 1 0.8 Defend
## BIS355,BIS356,KAY150 19 22 1 0.9 Defend
## CEN400 25 22 1 1.1 Defend
## GRA250 37 22 1 1.7 Defend
## JEN550 18 22 1 0.8 Defend
## LEE700 22 22 1 1.0 Defend
## MCG705 15 22 1 0.7 Defend
## POT500 16 22 1 0.7 Defend
## SYM200 11 22 1 0.5 Defend
## WON310 17 22 1 0.8 Defend
## WRA800 12 22 1 0.6 Defend
## AES200 21 66 3 0.3 Focus
## BAN420 21 44 2 0.5 Focus
## CAP650 22 44 2 0.5 Focus
## CHO250 15 44 2 0.3 Focus
## COU500 12 88 4 0.1 Focus
## DEN024 14 44 2 0.3 Focus
## DEN280 21 44 2 0.5 Focus
## DEN805 21 66 3 0.3 Focus
## DES100 18 44 2 0.4 Focus
## GED100 17 44 2 0.4 Focus
## GRE860,JON230 20 44 2 0.5 Focus
## IAG100 8 44 2 0.2 Focus
## ING200 12 44 2 0.3 Focus
## JOE705 8 44 2 0.2 Focus
## MAI420 43 88 4 0.5 Focus
## MAN200 43 88 4 0.5 Focus
## MAN210 16 66 3 0.2 Focus
## MOR750 20 66 3 0.3 Focus
## OCE200 2 44 2 0.0 Focus
## SCO810 32 66 3 0.5 Focus
## SWA350 32 66 3 0.5 Focus
## TAR250 13 44 2 0.3 Focus
## TAR500 9 44 2 0.2 Focus
## TOB200 28 110 5 0.3 Focus
## TWO030 8 44 2 0.2 Focus
## WHI465 9 44 2 0.2 Focus
## BRO300 5 22 1 0.2 Low Maintain
## JUK200 10 22 1 0.4 Low Maintain
## TAR100 8 22 1 0.4 Low Maintain
## WAN300 11 22 1 0.5 Low Maintain
## AMA500 31 44 2 0.7 Protect
## ANT400 40 66 3 0.6 Protect
## BEA050 24 44 2 0.5 Protect
## CAR400 172 154 7 1.1 Protect
## CLI200 52 88 4 0.6 Protect
## COA250 103 88 4 1.2 Protect
## COS800 56 44 2 1.3 Protect
## DEN055 26 44 2 0.6 Protect
## DUR500 78 132 6 0.6 Protect
## ELT500 23 44 2 0.5 Protect
## FEI350 38 66 3 0.6 Protect
## HAS975,TAY450 67 110 5 0.6 Protect
## HAW650 33 44 2 0.7 Protect
## KAN250 28 44 2 0.6 Protect
## KAP300 41 44 2 0.9 Protect
## KEN200 32 44 2 0.7 Protect
## MAR700 23 44 2 0.5 Protect
## MAT500 37 44 2 0.8 Protect
## OPE700 87 88 4 1.0 Protect
## PUR200 35 66 3 0.5 Protect
## QUE450 152 198 9 0.8 Protect
## RAM030 46 66 3 0.7 Protect
## RAP400 32 44 2 0.7 Protect
## ROS205 37 44 2 0.8 Protect
## STE350 37 44 2 0.8 Protect
## TAR450 25 44 2 0.6 Protect
## THE391 195 308 14 0.7 Protect
## VIC350 58 88 4 0.7 Protect
## WIN250,WIN251,WIN252 57 88 4 0.6 Protect
## WON315 28 44 2 0.6 Protect
## YOU545 51 88 4 0.6 Protect
Note that the echo = FALSE
parameter was added to the code chunk to prevent printing of the R code that generated the plot.