Skip to content

Instantly share code, notes, and snippets.

Christian Setzkorn csetzkorn

  • United Kingdom
Block or report user

Report or block csetzkorn

Hide content and notifications from this user.

Learn more about blocking users

Contact Support about this user’s behavior.

Learn more about reporting abuse

Report abuse
View GitHub Profile
@csetzkorn
csetzkorn / gist:478b49610526da85bd1424ef197c896d
Created May 15, 2017
Fit Self-Organizing Map Plus Predefined Boundaries
View gist:478b49610526da85bd1424ef197c896d
library(dplyr)
library(kohonen)
setwd('C:\\Users\\Christian\\Source\\Repos\\BlaDiBla')
OrginalData <- read.table("IrisData.txt",
header = TRUE, sep = "\t")
SubsetData <- subset(OrginalData, select = c("SepalLength", "SepalWidth", "PetalLength", "PetalWidth"))
TrainingMatrix <- as.matrix(scale(SubsetData))
You can’t perform that action at this time.