*这个示例程序展示了如何使用get_support_vector_class_svm来可视化SVM的支持向量。在本例中,将二维数据用于特征,因为它们可以很容易地可视化为区域。这个例子使用了两个彼此靠近的类,类之间有一个弯曲的边界。它从每个类中生成样本,并用样本训练支持向量机。然后,利用SVM对完整的二维特征空间进行分类。此外,支持向量是可视化的。
*显示设置
dev_close_window ()
dev_open_window (0, 0, 600, 600, 'black', WindowHandle)
dev_set_part (0, 0, 199, 199)
dev_update_off ()
set_display_font (WindowHandle, 16, 'mono', 'true', 'false')
*确定是否将图标对象的区域剪辑为当前使用的图像大小。
set_system ('clip_region', 'false')
*创建一个由多个像素描述的区域。
gen_region_points (Region1, rand(1000) * 200, rand(1000) * 200)
gen_region_points (Region2, rand(1000) * 200, rand(1000) * 200)
set_system ('clip_region', 'true')
*绘制椭圆
gen_ellipse (Ellipse1, 60, 45, rad(-80), 60, 25)
gen_ellipse (Ellipse2, 150, 120, rad(-30), 60, 35)
*合并为一个区域
union2 (Ellipse1, Ellipse2, Ellipse1)