//建立頂級窗口
toplevel = XtVaAppInitialize[&app, "List", NULL, 0,
&argc, argv, NULL, NULL]
//建立列表上的復合字符串
for[i=0 i<12 i++]
str_months[i] = XmStringCreateSimple[months[i]]
//建立列表
n = 0
XtSetArg[args[n], XmNitems, str_months] n++
XtSetArg[args[n], XmNitemCount, 12] n++
XtSetArg[args[n], XmNvisibleItemCount, 8] n++
//XtSetArg[args[n], XmNscrollBarDisplayPolicy, XmSTATIC] n++
//XtSetArg[args[n], XmNlistSizePolicy, XmCONSTANT] n++
XtSetArg[args[n], XmNselectionPolicy, XmEXTENDED_SELECT] n++
list = XmCreateScrolledList[toplevel, "list", args, n]
XtManageChild[list]
for[i=0 i<12 i++]
XmStringFree[str_months[i]]
//顯示窗口
XtRealizeWidget[toplevel]
//進入事件循環
XtAppMainLoop[app]
標簽：
NULL
XtVaAppInitialize
toplevel
List
上傳時間：
2013-12-21
上傳用戶：asdkin
批處理感知器算法的代碼matlab
w1=[1,0.1,1.1;1,6.8,7.1;1,-3.5,-4.1;1,2.0,2.7;1,4.1,2.8;1,3.1,5.0;1,-0.8,-1.3;
1,0.9,1.2;1,5.0,6.4;1,3.9,4.0];
w2=[1,7.1,4.2;1,-1.4,-4.3;1,4.5,0.0;1,6.3,1.6;1,4.2,1.9;1,1.4,-3.2;1,2.4,-4.0;
1,2.5,-6.1;1,8.4,3.7;1,4.1,-2.2];
w3=[1,-3.0,-2.9;1,0.5,8.7;1,2.9,2.1;1,-0.1,5.2;1,-4.0,2.2;1,-1.3,3.7;1,-3.4,6.2;
1,-4.1,3.4;1,-5.1,1.6;1,1.9,5.1];
figure;
plot(w3(:,2),w3(:,3),'ro');
hold on;
plot(w2(:,2),w2(:,3),'b+');
W=[w2;-w3];%增廣樣本規范化
a=[0,0,0];
k=0;%記錄步數
n=1;
y=zeros(size(W,2),1);%記錄錯分的樣本
while any(y<=0)
k=k+1;
y=a*transpose(W);%記錄錯分的樣本
a=a+sum(W(find(y<=0),:));%更新a
if k >= 250
break
end
end
if k<250
disp(['a為：',num2str(a)])
disp(['k為：',num2str(k)])
else
disp(['在250步以內沒有收斂，終止'])
end
%判決面：x2=-a2*x1/a3-a1/a3
xmin=min(min(w1(:,2)),min(w2(:,2)));
xmax=max(max(w1(:,2)),max(w2(:,2)));
x=xmin-1:xmax+1;%(xmax-xmin):
y=-a(2)*x/a(3)-a(1)/a(3);
plot(x,y)
標簽：
批處理
算法matlab
上傳時間：
2016-11-07
上傳用戶：a1241314660
