Skip to content

Instantly share code, notes, and snippets.

@monogenea
Created October 7, 2019 18:24
Show Gist options
  • Save monogenea/3783a453aefa9d7b5794eac44b9fc6a5 to your computer and use it in GitHub Desktop.
Save monogenea/3783a453aefa9d7b5794eac44b9fc6a5 to your computer and use it in GitHub Desktop.
# Check processing on second cat
par(mar = rep(0, 4))
testCat <- t(matrix(as.numeric(trainData$X[2,]),
nrow = width, ncol = height, T))
image(t(apply(testCat, 2, rev)), col = gray.colors(12),
axes = F)
# Save / load
save(trainData, testData, file = "catdogData.RData")
# load("catdogData.RData")
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment