R语言可视化代码
install.packages("plotly")
library(plotly)
data1<-read.table("a.txt",header=FALSE)#读取数据
layout(plot_ly(data =data1, x = data1$chol, y = data1$thalach, mode = "markers",
color = data1$clusterlabel),
xaxis = list( #设置X轴标题和刻度线
title = "chol(mmHg)",
showgrid = F
),
yaxis = list(
title = "thalach(bpm)"
)
)