*DANGER* This is just a silly blog and shouldn’t be taken any seriously.*DANGER*
Ok…you may wonder…why is Blag writing a silly blog? Well…I’m a Developer Evangelist…and it’s my job to keep developers entertained Also…I have so free time to spare
As you all may know…SAP HANA Studio runs on top of Eclipse…which means that if we can run R on Eclipse…then we can obviously run R on SAP HANA Studio…that’s exactly what we’re going to do
As easy as it gets…follows this instructions…
- Go to Help –> Install New Software
- Put the following repository
- Choose Walware – StatET
- Once installed, your SAP HANA Studio will restart and you will need to configure R.
- Go to Windows –> Preferences.
- StatET –> Run/Debug –> R Environments –> Add (In my picture, I’m using Edit as I already add it).
Once that it’s done, we can go ahead and create our R script…
- Go to File –> New Project –> R Project.
- On the created R Project, right click and select New –> R Script File.
Copy this code inside your new file…
result<-read.table('clipboard',header=TRUE,sep=';') result<-subset(result, !duplicated(DISTANCE)) flights<-data.frame(DISTANCE=as.numeric(result$DISTANCE)) row.names(flights)<-result$FLIGHT d<-dist(as.matrix(flights)) hc<-hclust(d) plot(hc)
Now...go to the "Modeler" perspective...open a SQL Console and write the following...
SELECT DISTINCT CITYFROM || '/' || CITYTO "FLIGHT", DISTANCE FROM SFLIGHT.SPFLI WHERE DISTANCE > 0 AND CARRID = 'SQ'
Run it...and here's come the funny part...go to the Result tab and select all records...then press Copy Rows, so the selection gets copied into the Clipboard.
Go back to the StatET perspective and click the "Run file in R via command" button...
When you run the code...you're not going to see any response, unless there's an error...so just go to the R Graphics tab which is at the bottom where the Console window seats...expand it...and you will see a Cluster Dendogram graphic generated -;)
I told you...this was a very silly post...but at least...we never left the SAP HANA Studio -:P
See you next time!