Otherwise, if data structure like this....


data test_2;
        input group $ subgroup $ res;
        datalines;
        a  aa 1
        a  aa 1
        a  aa 1
        a  bb 1
        a  bb 1
        a  bb 1
        a  bb 1
        a  cc 1
        b  aa 1
        b  aa 1
        b  aa 1
        b  aa 1
        b  bb 1
        b  cc 1
        b  cc 1
        b  dd 1
        b  dd 1
        ;
run;



proc gchart data=test_2;
     vbar subgroup /
        group=group
        subgroup=subgroup
        space=0      /* spacing between bars */
        gspace=10      /* spacing between groups of bars */
                discrete
                type=percent
                ;
run;
quit;

Very good !thank you  very much!