function [y,x]=zfc(txt,jy)
%变量txt为原字符串,每个字符串以";"结尾
%jy为需判断的字母串,没有空格和分号隔开
%y为各字母占百分比(%)
%x各字母的个数及字符串总数(个)
if nargin==0
disp('"默认字符串为abcabcrcbacbalkkjoiuopuop;",判断字符串"abc"中每个字母的百分比');
txt='abcabcrcbacbalkkjoiuopuop;';jy='abc';
else if nargin==1
disp('默认判断字符串"abc"中每个字母的百分比')
jy='abc';
end
end
j=strfind(txt,';');
m=length(j);
nj=size(j,2);
ntxt=length(txt);
if nj==0
j(1)=ntxt;m=1;
else if j(nj)~=ntxt;
j(nj+1)=ntxt+1;
m=m+1;
end
end
mjy=length(jy);
x=zeros(m,mjy+1);y=zeros(m,mjy);
for k=1:m
if k==1
s=k;e=j(k)-1;
else s=j(k-1)+1;e=j(k)-1;
end
a=0;b=0;c=0;d=0;n=e-s+1;
for i=s:e
for ijy=1:mjy
if txt(i)==jy(ijy)
x(k,ijy)=x(k,ijy)+1;
end
end
end
y(k,1:mjy)=x(k,1:mjy)*100/n;
x(k,mjy+1)=n;
end