Skip to content

Instantly share code, notes, and snippets.

@illy

illy/matrix_manipulation.r

Last active December 10, 2015 22:59
Show Gist options
  • Save illy/4506185 to your computer and use it in GitHub Desktop.
Save illy/4506185 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
matrix_manipulation.r
m.acf.geQuote$Var1[m.acf.geQuote$Var1 == 1] <- "Day0"
m.acf.geQuote$Var1[m.acf.geQuote$Var1 == 2] <- "Day1"
m.acf.geQuote$Var1[m.acf.geQuote$Var1 == 3] <- "Day2"
m.acf.geQuote$Var1[m.acf.geQuote$Var1 == 4] <- "Day3"
m.acf.geQuote$Var1[m.acf.geQuote$Var1 == 5] <- "Day4"
m.acf.geQuote$Var1 <- factor(m.acf.geQuote$Var1,
+ levels=unique(m.acf.geQuote$Var1), ordered=T)
m.acf.geQuote$Var2[m.acf.geQuote$Var2 == 1] <- "Open"
m.acf.geQuote$Var2[m.acf.geQuote$Var2 == 2] <- "Close"
m.acf.geQuote$Var2[m.acf.geQuote$Var2 == 3] <- "Low"
m.acf.geQuote$Var2[m.acf.geQuote$Var2 == 4] <- "High"
m.acf.geQuote$Var2 <- factor(m.acf.geQuote$Var2,
+ levels=unique(m.acf.geQuote$Var2), ordered=T)
m.acf.geQuote$Var3[m.acf.geQuote$Var3 == 1] <- "Open"
m.acf.geQuote$Var3[m.acf.geQuote$Var3 == 2] <- "Close"
m.acf.geQuote$Var3[m.acf.geQuote$Var3 == 3] <- "Low"
m.acf.geQuote$Var3[m.acf.geQuote$Var3 == 4] <- "High"
m.acf.geQuote$Var3 <- factor(m.acf.geQuote$Var3,
+ levels=unique(m.acf.geQuote$Var3), ordered=T)
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment