要先把数据 reshape 再作图。

******read data*********;
data test_data;
input student course1-course5;
datalines;
1        75        86        58        78        81
2        56        84        53        90        60
3        79        63        77        65        79
4        83        63        93        89        98
5        55        80        69        63        76
6        63        51        87        63        99
;
run;

******reshape data**********;
data trans_data;
set test_data;
array course_name{*} course1-course5;
do i=1 to 5;
course=vname(course_name[i]);
score=course_name[i];
output;
end;
drop course1-course5 i;
run;

******plot data********;
proc sgplot data=trans_data;
vbox score/ category=course;
run;

请问，如果原来的列名不是course1，course2...而是math，English...
这样要怎么办？

******read data*********;
data test_data;
input student Math English Physics Chemistry History;
datalines;
1        75        86        58        78        81
2        56        84        53        90        60
3        79        63        77        65        79
4        83        63        93        89        98
5        55        80        69        63        76
6        63        51        87        63        99
;
run;

******reshape data**********;
data trans_data;
set test_data;
array course_name{*} Math English Physics Chemistry History;
do i=1 to dim(course_name);
course=vname(course_name);
score=course_name;
output;
end;
drop Math English Physics Chemistry History i;
run;

******plot data********;
proc sgplot data=trans_data;
vbox score/ category=course;
xaxis discreteorder=data;
run;