how to use sprintf to an array ?

29 views (last 30 days)
Arif
Arif on 14 Apr 2024
Commented: Voss on 19 Apr 2024
Hi guys, im trying to make some text using sprintf, here i give example below:
Basically I want all datas from variable ID,X,Z in cell array comes out one bye one to the txtline(ij). Is it possible?
Here i give the code :
clear;
clc;
H = 5;
L = 15;
Ns = 2;
Nb = 1;
PortalHeight = H;
Bayspan = L;
NumberStory = Ns;
NumberBay = Nb;
% Variable1
h = [0.8,1.00,1.20,1.40,1.6,1.80];
% Variable2
Lss = [2.00,2.40,2.80,3.20,3.60,4.00];
% Variable3
Nss = [2,3,4];
% Definition
Var1HeightofTrussBeam = h;
Var2LengthSpecialSegment = Lss;
Var3NumberSpecialSegment = Nss;
% % Xbase = zeros(1,length(Totalvariant));
% % Zbase = zeros(1,length(Totalvariant));
% % Xcol = zeros(1,length(Totalvariant));
% % Zcol = zeros(1,length(Totalvariant));
% % Xos = zeros(1,length(Totalvariant));
% % Zos = zeros(1,length(Totalvariant));
% % Xss = zeros(1,length(Totalvariant));
% % Zss = zeros(1,length(Totalvariant));
% % X = zeros(1,length(Totalvariant));
% % Z = zeros(1,length(Totalvariant));
% % jointbase = zeros(1,length(Totalvariant));
% % jointcolumn = zeros(1,length(Totalvariant));
% % jointordinarysegment = zeros(1,length(Totalvariant));
% % jointtopordinarysegment = zeros(1,length(Totalvariant));
% % jointbottomordinarysegment = zeros(1,length(Totalvariant));
% % jointspecialsegment = zeros(1,length(Totalvariant));
% % jointtopspecialsegment = zeros(1,length(Totalvariant));
% % jointbottomspecialsegment = zeros(1,length(Totalvariant));
ijk = 0;
for i = 1:numel(h)
for j = 1:numel(Lss)
for k = 1:numel(Nss)
ijk = ijk+1;
Variantmodel{ijk,:} = table(ijk,h(i),Lss(j),Nss(k),'VariableNames',{'VariantID','Height','Length','Number'});
%% Base(base)
Xbase{ijk,:} = L*(0:NumberBay);
Zbase{ijk,:} = repelem(0,1,length(Xbase{ijk,:}));
%% Column(col)
Xcolumn = L*(0:NumberBay);
Zcolumn = repelem(H*(1:NumberStory),1,length(Xcolumn));
Xbotbeam = L*(0:NumberBay);
Zbotbeam = repelem((H*(1:NumberStory)-h(i)),1,length(Xbotbeam));
% replicate [X] to be the same size as [Z] for plotting:
Xcol{ijk,:} = repmat([Xcolumn,Xbotbeam],1,NumberStory);
Zcol{ijk,:} = [Zcolumn,Zbotbeam];
%% Ordinary Segment
% calculate span length of ordinary segment
Los = (L-Lss(j))/2;
Nos = Los/h(i);
Nos = round(Nos);
los = Los/Nos;
totalspan{ijk,:} = los*Nos*2+Lss(j);
if totalspan{ijk,:} == 15.000
checkspan{ijk,:} = "correct span";
else
checkspan{ijk,:} = "span must be 15m";
end
% top and bottom joint of ordinary segment(os)
XTopOrdinarySegment = reshape([los*(1:Nos),(L/2+Lss(j)/2)+los*(0:Nos-1)].'+L*(0:(NumberBay-1)),1,[]);
XBottomOrdinarySegment = XTopOrdinarySegment;
ZTopOrdinarySegment = repelem(H*(1:NumberStory),1,2*Nos*NumberBay);
ZBottomOrdinarySegment = repelem(H*(1:NumberStory)-h(i),1,2*Nos*NumberBay);
% replicate [X] to be the same size as [Z] for plotting:
Xos{ijk,:} = repmat([XTopOrdinarySegment,XBottomOrdinarySegment],1,NumberStory);
Zos{ijk,:} = [ZTopOrdinarySegment,ZBottomOrdinarySegment];
%% Special Segment
% calculate span length of special segment
lss = Lss(j)/Nss(k);
% top and bottom joint of special segment(ss)
XTopSpecialSegment = reshape((lss*(0:Nss(k))+L/2-Lss(j)/2).'+L*(0:(NumberBay-1)),1,[]);
XBottomSpecialSegment = XTopSpecialSegment;
ZTopSpecialSegment = repelem(H*(1:NumberStory),1,length(XTopSpecialSegment));
ZBottomSpecialSegment = repelem(H*(1:NumberStory)-h(i),1,length(XBottomSpecialSegment));
% replicate [X] to be the same size as [Z] for plotting:
Xss{ijk,:} = repmat([XTopSpecialSegment,XBottomSpecialSegment],1,NumberStory);
Zss{ijk,:} = [ZTopSpecialSegment,ZBottomSpecialSegment];
%% Plot Joint
X{ijk,:} = [Xbase{ijk,:},Xcol{ijk,:},Xos{ijk,:},Xss{ijk,:}];
Z{ijk,:} = [Zbase{ijk,:},Zcol{ijk,:},Zos{ijk,:},Zss{ijk,:}];
scatter(X{ijk,:},Z{ijk,:},'filled'),grid on
%check angle
tangent = (Lss(j)/Nss(k))/h(i);
anglespecialsegment(ijk) = atand(tangent);
%% Name Joint
jointbase{ijk} = table((1:numel(Xbase{ijk,:}))',Xbase{ijk,:}',Zbase{ijk,:}','VariableNames',{'ID','X','Z'});
jointcolumn{ijk} = table((max(jointbase{ijk}.ID)+1:numel(Xcol{ijk,:})+max(jointbase{ijk}.ID))',Xcol{ijk,:}',Zcol{ijk,:}','VariableNames',{'ID','X','Z'});
jointordinarysegment{ijk} = table((max(jointcolumn{ijk}.ID)+1:numel(Xos{ijk,:})+max(jointcolumn{ijk}.ID))',Xos{ijk,:}',Zos{ijk,:}','VariableNames',{'ID','X','Z'});
jointtopordinarysegment{ijk} = jointordinarysegment{ijk}(ismember(jointordinarysegment{ijk}.Z,Zcolumn),:);
jointbottomordinarysegment{ijk} = jointordinarysegment{ijk}(ismember(jointordinarysegment{ijk}.Z,Zbotbeam),:);
jointspecialsegment{ijk} = table((max(jointbottomordinarysegment{ijk}.ID)+1:numel(Xss{ijk,:})+max(jointbottomordinarysegment{ijk}.ID))',Xss{ijk,:}',Zss{ijk,:}','VariableNames',{'ID','X','Z'});
jointtopspecialsegment{ijk} = jointspecialsegment{ijk}(ismember(jointspecialsegment{ijk}.Z,Zcolumn),:);
jointbottomspecialsegment{ijk} = jointspecialsegment{ijk}(ismember(jointspecialsegment{ijk}.Z,Zbotbeam),:);
end
end
end
%% Verify Variants Which Passed the Angle Requirement
tablecheck = table((1:numel(anglespecialsegment))',totalspan,anglespecialsegment','VariableNames',{'VariantID','Total Span','Angle'});
VariantIDPassed = tablecheck.VariantID(tablecheck.Angle>=30 & tablecheck.Angle<=60);
jointbase = table((1:numel(jointbase))',jointbase','VariableNames',{'VariantID','Joint Base'});
jointbase = jointbase(ismember(jointbase.VariantID,VariantIDPassed),:);
jointcolumn = table((1:numel(jointcolumn))',jointcolumn','VariableNames',{'VariantID','Joint Column'});
jointcolumn = jointcolumn(ismember(jointcolumn.VariantID,VariantIDPassed),:);
jointtopordinarysegment = table((1:numel(jointtopordinarysegment))',jointtopordinarysegment','VariableNames',{'VariantID','Joint Top Ordinary Segment'});
jointtopordinarysegment = jointtopordinarysegment(ismember(jointtopordinarysegment.VariantID,VariantIDPassed),:);
jointbottomordinarysegment = table((1:numel(jointbottomordinarysegment))',jointbottomordinarysegment','VariableNames',{'VariantID','Joint Bottom Ordinary Segment'});
jointbottomordinarysegment = jointbottomordinarysegment(ismember(jointbottomordinarysegment.VariantID,VariantIDPassed),:);
jointtopspecialsegment = table((1:numel(jointtopspecialsegment))',jointtopspecialsegment','VariableNames',{'VariantID','Joint Top Special Segment'});
jointtopspecialsegment = jointtopspecialsegment(ismember(jointtopspecialsegment.VariantID,VariantIDPassed),:);
jointbottomspecialsegment = table((1:numel(jointbottomspecialsegment))',jointbottomspecialsegment','VariableNames',{'VariantID','Joint Bottom Special Segment'});
jointbottomspecialsegment = jointbottomspecialsegment(ismember(jointbottomspecialsegment.VariantID,VariantIDPassed),:);
%% Print data in cell array one-by-one
ij = 0
for i = 1:height(jointbottomspecialsegment)
BottomSS = jointbottomspecialsegment.("Joint Bottom Special Segment")(i)
for j = 1:height(BottomSS{1,1})
ij = ij+1
Joint = BottomSS{1,1}.ID(j)
X = BottomSS{1,1}.X(j)
Z =BottomSS{1,1}.Z(j)
txtline(ij) = sprintf(' Joint=%d CoordSys=GLOBAL CoordType=Cartesian XorR=%d Y=0 Z=%d SpecialJt=No GlobalX=%d GlobalY=0 GlobalZ=%d');
end
end

Sign in to answer this question.

Accepted Answer

Voss
Voss on 14 Apr 2024
Ran in:
Yes, it is possible.
However, your sprintf format specification has 5 formatting operators (all %d), but you only have 3 numbers (ID,X,Z) to go into it. I'm not sure what the other two numbers are supposed to be or whether the format specification is supposed to have only 3 formatting operators. Here I'll use X and Z two times each to fill it in, and you can adjust it as needed:
clear;
clc;
H = 5;
L = 15;
Ns = 2;
Nb = 1;
PortalHeight = H;
Bayspan = L;
NumberStory = Ns;
NumberBay = Nb;
% Variable1
h = [0.8,1.00,1.20,1.40,1.6,1.80];
% Variable2
Lss = [2.00,2.40,2.80,3.20,3.60,4.00];
% Variable3
Nss = [2,3,4];
% Definition
Var1HeightofTrussBeam = h;
Var2LengthSpecialSegment = Lss;
Var3NumberSpecialSegment = Nss;
% % Xbase = zeros(1,length(Totalvariant));
% % Zbase = zeros(1,length(Totalvariant));
% % Xcol = zeros(1,length(Totalvariant));
% % Zcol = zeros(1,length(Totalvariant));
% % Xos = zeros(1,length(Totalvariant));
% % Zos = zeros(1,length(Totalvariant));
% % Xss = zeros(1,length(Totalvariant));
% % Zss = zeros(1,length(Totalvariant));
% % X = zeros(1,length(Totalvariant));
% % Z = zeros(1,length(Totalvariant));
% % jointbase = zeros(1,length(Totalvariant));
% % jointcolumn = zeros(1,length(Totalvariant));
% % jointordinarysegment = zeros(1,length(Totalvariant));
% % jointtopordinarysegment = zeros(1,length(Totalvariant));
% % jointbottomordinarysegment = zeros(1,length(Totalvariant));
% % jointspecialsegment = zeros(1,length(Totalvariant));
% % jointtopspecialsegment = zeros(1,length(Totalvariant));
% % jointbottomspecialsegment = zeros(1,length(Totalvariant));
ijk = 0;
for i = 1:numel(h)
for j = 1:numel(Lss)
for k = 1:numel(Nss)
ijk = ijk+1;
Variantmodel{ijk,:} = table(ijk,h(i),Lss(j),Nss(k),'VariableNames',{'VariantID','Height','Length','Number'});
%% Base(base)
Xbase{ijk,:} = L*(0:NumberBay);
Zbase{ijk,:} = repelem(0,1,length(Xbase{ijk,:}));
%% Column(col)
Xcolumn = L*(0:NumberBay);
Zcolumn = repelem(H*(1:NumberStory),1,length(Xcolumn));
Xbotbeam = L*(0:NumberBay);
Zbotbeam = repelem((H*(1:NumberStory)-h(i)),1,length(Xbotbeam));
% replicate [X] to be the same size as [Z] for plotting:
Xcol{ijk,:} = repmat([Xcolumn,Xbotbeam],1,NumberStory);
Zcol{ijk,:} = [Zcolumn,Zbotbeam];
%% Ordinary Segment
% calculate span length of ordinary segment
Los = (L-Lss(j))/2;
Nos = Los/h(i);
Nos = round(Nos);
los = Los/Nos;
totalspan{ijk,:} = los*Nos*2+Lss(j);
if totalspan{ijk,:} == 15.000
checkspan{ijk,:} = "correct span";
else
checkspan{ijk,:} = "span must be 15m";
end
% top and bottom joint of ordinary segment(os)
XTopOrdinarySegment = reshape([los*(1:Nos),(L/2+Lss(j)/2)+los*(0:Nos-1)].'+L*(0:(NumberBay-1)),1,[]);
XBottomOrdinarySegment = XTopOrdinarySegment;
ZTopOrdinarySegment = repelem(H*(1:NumberStory),1,2*Nos*NumberBay);
ZBottomOrdinarySegment = repelem(H*(1:NumberStory)-h(i),1,2*Nos*NumberBay);
% replicate [X] to be the same size as [Z] for plotting:
Xos{ijk,:} = repmat([XTopOrdinarySegment,XBottomOrdinarySegment],1,NumberStory);
Zos{ijk,:} = [ZTopOrdinarySegment,ZBottomOrdinarySegment];
%% Special Segment
% calculate span length of special segment
lss = Lss(j)/Nss(k);
% top and bottom joint of special segment(ss)
XTopSpecialSegment = reshape((lss*(0:Nss(k))+L/2-Lss(j)/2).'+L*(0:(NumberBay-1)),1,[]);
XBottomSpecialSegment = XTopSpecialSegment;
ZTopSpecialSegment = repelem(H*(1:NumberStory),1,length(XTopSpecialSegment));
ZBottomSpecialSegment = repelem(H*(1:NumberStory)-h(i),1,length(XBottomSpecialSegment));
% replicate [X] to be the same size as [Z] for plotting:
Xss{ijk,:} = repmat([XTopSpecialSegment,XBottomSpecialSegment],1,NumberStory);
Zss{ijk,:} = [ZTopSpecialSegment,ZBottomSpecialSegment];
%% Plot Joint
X{ijk,:} = [Xbase{ijk,:},Xcol{ijk,:},Xos{ijk,:},Xss{ijk,:}];
Z{ijk,:} = [Zbase{ijk,:},Zcol{ijk,:},Zos{ijk,:},Zss{ijk,:}];
scatter(X{ijk,:},Z{ijk,:},'filled'),grid on
%check angle
tangent = (Lss(j)/Nss(k))/h(i);
anglespecialsegment(ijk) = atand(tangent);
%% Name Joint
jointbase{ijk} = table((1:numel(Xbase{ijk,:}))',Xbase{ijk,:}',Zbase{ijk,:}','VariableNames',{'ID','X','Z'});
jointcolumn{ijk} = table((max(jointbase{ijk}.ID)+1:numel(Xcol{ijk,:})+max(jointbase{ijk}.ID))',Xcol{ijk,:}',Zcol{ijk,:}','VariableNames',{'ID','X','Z'});
jointordinarysegment{ijk} = table((max(jointcolumn{ijk}.ID)+1:numel(Xos{ijk,:})+max(jointcolumn{ijk}.ID))',Xos{ijk,:}',Zos{ijk,:}','VariableNames',{'ID','X','Z'});
jointtopordinarysegment{ijk} = jointordinarysegment{ijk}(ismember(jointordinarysegment{ijk}.Z,Zcolumn),:);
jointbottomordinarysegment{ijk} = jointordinarysegment{ijk}(ismember(jointordinarysegment{ijk}.Z,Zbotbeam),:);
jointspecialsegment{ijk} = table((max(jointbottomordinarysegment{ijk}.ID)+1:numel(Xss{ijk,:})+max(jointbottomordinarysegment{ijk}.ID))',Xss{ijk,:}',Zss{ijk,:}','VariableNames',{'ID','X','Z'});
jointtopspecialsegment{ijk} = jointspecialsegment{ijk}(ismember(jointspecialsegment{ijk}.Z,Zcolumn),:);
jointbottomspecialsegment{ijk} = jointspecialsegment{ijk}(ismember(jointspecialsegment{ijk}.Z,Zbotbeam),:);
end
end
end
%% Verify Variants Which Passed the Angle Requirement
tablecheck = table((1:numel(anglespecialsegment))',totalspan,anglespecialsegment','VariableNames',{'VariantID','Total Span','Angle'});
VariantIDPassed = tablecheck.VariantID(tablecheck.Angle>=30 & tablecheck.Angle<=60);
jointbase = table((1:numel(jointbase))',jointbase','VariableNames',{'VariantID','Joint Base'});
jointbase = jointbase(ismember(jointbase.VariantID,VariantIDPassed),:);
jointcolumn = table((1:numel(jointcolumn))',jointcolumn','VariableNames',{'VariantID','Joint Column'});
jointcolumn = jointcolumn(ismember(jointcolumn.VariantID,VariantIDPassed),:);
jointtopordinarysegment = table((1:numel(jointtopordinarysegment))',jointtopordinarysegment','VariableNames',{'VariantID','Joint Top Ordinary Segment'});
jointtopordinarysegment = jointtopordinarysegment(ismember(jointtopordinarysegment.VariantID,VariantIDPassed),:);
jointbottomordinarysegment = table((1:numel(jointbottomordinarysegment))',jointbottomordinarysegment','VariableNames',{'VariantID','Joint Bottom Ordinary Segment'});
jointbottomordinarysegment = jointbottomordinarysegment(ismember(jointbottomordinarysegment.VariantID,VariantIDPassed),:);
jointtopspecialsegment = table((1:numel(jointtopspecialsegment))',jointtopspecialsegment','VariableNames',{'VariantID','Joint Top Special Segment'});
jointtopspecialsegment = jointtopspecialsegment(ismember(jointtopspecialsegment.VariantID,VariantIDPassed),:);
jointbottomspecialsegment = table((1:numel(jointbottomspecialsegment))',jointbottomspecialsegment','VariableNames',{'VariantID','Joint Bottom Special Segment'});
jointbottomspecialsegment = jointbottomspecialsegment(ismember(jointbottomspecialsegment.VariantID,VariantIDPassed),:);
%% Print data in cell array one-by-one
ij = 0;
txtline = strings(0,1); % make txtline a string array
for i = 1:height(jointbottomspecialsegment)
BottomSS = jointbottomspecialsegment.("Joint Bottom Special Segment")(i);
for j = 1:height(BottomSS{1,1})
ij = ij+1;
Joint = BottomSS{1,1}.ID(j);
X = BottomSS{1,1}.X(j);
Z = BottomSS{1,1}.Z(j);
txtline(ij,1) = sprintf(' Joint=%d CoordSys=GLOBAL CoordType=Cartesian XorR=%d Y=0 Z=%d SpecialJt=No GlobalX=%d GlobalY=0 GlobalZ=%d',Joint,X,Z,X,Z);
end
end
txtline
txtline = 578x1 string array
" Joint=81 CoordSys=GLOBAL CoordType=Cartesian XorR=6.500000e+00 Y=0 Z=4.200000e+00 SpecialJt=No GlobalX=6.500000e+00 GlobalY=0 GlobalZ=4.200000e+00" " Joint=82 CoordSys=GLOBAL CoordType=Cartesian XorR=7.500000e+00 Y=0 Z=4.200000e+00 SpecialJt=No GlobalX=7.500000e+00 GlobalY=0 GlobalZ=4.200000e+00" " Joint=83 CoordSys=GLOBAL CoordType=Cartesian XorR=8.500000e+00 Y=0 Z=4.200000e+00 SpecialJt=No GlobalX=8.500000e+00 GlobalY=0 GlobalZ=4.200000e+00" " Joint=84 CoordSys=GLOBAL CoordType=Cartesian XorR=6.500000e+00 Y=0 Z=9.200000e+00 SpecialJt=No GlobalX=6.500000e+00 GlobalY=0 GlobalZ=9.200000e+00" " Joint=85 CoordSys=GLOBAL CoordType=Cartesian XorR=7.500000e+00 Y=0 Z=9.200000e+00 SpecialJt=No GlobalX=7.500000e+00 GlobalY=0 GlobalZ=9.200000e+00" " Joint=86 CoordSys=GLOBAL CoordType=Cartesian XorR=8.500000e+00 Y=0 Z=9.200000e+00 SpecialJt=No GlobalX=8.500000e+00 GlobalY=0 GlobalZ=9.200000e+00" " Joint=83 CoordSys=GLOBAL CoordType=Cartesian XorR=6.500000e+00 Y=0 Z=4.200000e+00 SpecialJt=No GlobalX=6.500000e+00 GlobalY=0 GlobalZ=4.200000e+00" " Joint=84 CoordSys=GLOBAL CoordType=Cartesian XorR=7.166667e+00 Y=0 Z=4.200000e+00 SpecialJt=No GlobalX=7.166667e+00 GlobalY=0 GlobalZ=4.200000e+00" " Joint=85 CoordSys=GLOBAL CoordType=Cartesian XorR=7.833333e+00 Y=0 Z=4.200000e+00 SpecialJt=No GlobalX=7.833333e+00 GlobalY=0 GlobalZ=4.200000e+00" " Joint=86 CoordSys=GLOBAL CoordType=Cartesian XorR=8.500000e+00 Y=0 Z=4.200000e+00 SpecialJt=No GlobalX=8.500000e+00 GlobalY=0 GlobalZ=4.200000e+00" " Joint=87 CoordSys=GLOBAL CoordType=Cartesian XorR=6.500000e+00 Y=0 Z=9.200000e+00 SpecialJt=No GlobalX=6.500000e+00 GlobalY=0 GlobalZ=9.200000e+00" " Joint=88 CoordSys=GLOBAL CoordType=Cartesian XorR=7.166667e+00 Y=0 Z=9.200000e+00 SpecialJt=No GlobalX=7.166667e+00 GlobalY=0 GlobalZ=9.200000e+00" " Joint=89 CoordSys=GLOBAL CoordType=Cartesian XorR=7.833333e+00 Y=0 Z=9.200000e+00 SpecialJt=No GlobalX=7.833333e+00 GlobalY=0 GlobalZ=9.200000e+00" " Joint=90 CoordSys=GLOBAL CoordType=Cartesian XorR=8.500000e+00 Y=0 Z=9.200000e+00 SpecialJt=No GlobalX=8.500000e+00 GlobalY=0 GlobalZ=9.200000e+00" " Joint=85 CoordSys=GLOBAL CoordType=Cartesian XorR=6.500000e+00 Y=0 Z=4.200000e+00 SpecialJt=No GlobalX=6.500000e+00 GlobalY=0 GlobalZ=4.200000e+00" " Joint=86 CoordSys=GLOBAL CoordType=Cartesian XorR=7 Y=0 Z=4.200000e+00 SpecialJt=No GlobalX=7 GlobalY=0 GlobalZ=4.200000e+00" " Joint=87 CoordSys=GLOBAL CoordType=Cartesian XorR=7.500000e+00 Y=0 Z=4.200000e+00 SpecialJt=No GlobalX=7.500000e+00 GlobalY=0 GlobalZ=4.200000e+00" " Joint=88 CoordSys=GLOBAL CoordType=Cartesian XorR=8 Y=0 Z=4.200000e+00 SpecialJt=No GlobalX=8 GlobalY=0 GlobalZ=4.200000e+00" " Joint=89 CoordSys=GLOBAL CoordType=Cartesian XorR=8.500000e+00 Y=0 Z=4.200000e+00 SpecialJt=No GlobalX=8.500000e+00 GlobalY=0 GlobalZ=4.200000e+00" " Joint=90 CoordSys=GLOBAL CoordType=Cartesian XorR=6.500000e+00 Y=0 Z=9.200000e+00 SpecialJt=No GlobalX=6.500000e+00 GlobalY=0 GlobalZ=9.200000e+00" " Joint=91 CoordSys=GLOBAL CoordType=Cartesian XorR=7 Y=0 Z=9.200000e+00 SpecialJt=No GlobalX=7 GlobalY=0 GlobalZ=9.200000e+00" " Joint=92 CoordSys=GLOBAL CoordType=Cartesian XorR=7.500000e+00 Y=0 Z=9.200000e+00 SpecialJt=No GlobalX=7.500000e+00 GlobalY=0 GlobalZ=9.200000e+00" " Joint=93 CoordSys=GLOBAL CoordType=Cartesian XorR=8 Y=0 Z=9.200000e+00 SpecialJt=No GlobalX=8 GlobalY=0 GlobalZ=9.200000e+00" " Joint=94 CoordSys=GLOBAL CoordType=Cartesian XorR=8.500000e+00 Y=0 Z=9.200000e+00 SpecialJt=No GlobalX=8.500000e+00 GlobalY=0 GlobalZ=9.200000e+00" " Joint=81 CoordSys=GLOBAL CoordType=Cartesian XorR=6.300000e+00 Y=0 Z=4.200000e+00 SpecialJt=No GlobalX=6.300000e+00 GlobalY=0 GlobalZ=4.200000e+00" " Joint=82 CoordSys=GLOBAL CoordType=Cartesian XorR=7.500000e+00 Y=0 Z=4.200000e+00 SpecialJt=No GlobalX=7.500000e+00 GlobalY=0 GlobalZ=4.200000e+00" " Joint=83 CoordSys=GLOBAL CoordType=Cartesian XorR=8.700000e+00 Y=0 Z=4.200000e+00 SpecialJt=No GlobalX=8.700000e+00 GlobalY=0 GlobalZ=4.200000e+00" " Joint=84 CoordSys=GLOBAL CoordType=Cartesian XorR=6.300000e+00 Y=0 Z=9.200000e+00 SpecialJt=No GlobalX=6.300000e+00 GlobalY=0 GlobalZ=9.200000e+00" " Joint=85 CoordSys=GLOBAL CoordType=Cartesian XorR=7.500000e+00 Y=0 Z=9.200000e+00 SpecialJt=No GlobalX=7.500000e+00 GlobalY=0 GlobalZ=9.200000e+00" " Joint=86 CoordSys=GLOBAL CoordType=Cartesian XorR=8.700000e+00 Y=0 Z=9.200000e+00 SpecialJt=No GlobalX=8.700000e+00 GlobalY=0 GlobalZ=9.200000e+00"
You may want to use %g or %.1f or similar instead of %d for the X and Z values.
  7 Comments
Show 5 older comments
Arif
Arif on 19 Apr 2024
''So txtline should be an array (cell array or string array) with as many elements as jointbottomspecialsegment has rows, right?'' Yes
"I think I understand that much, but why should each element of txtline contain multiple lines of text as in the example txtline(1) and txtline(2) you show?" Because i want to create many files (number of file is same with jointbottomspecialsegment's height)) with .txt extension and each file contains like this :
I already know how to export the string to be a text.file and now im trying to make variable in-array and contain string like txtline(1) and txtline(2) that i showed above.
Voss
Voss on 19 Apr 2024
Ran in:
OK. I understand now. Thank you for the explanation.
See below for one way to generate txtline like you want and write each element to a file.
clear;
clc;
H = 5;
L = 15;
Ns = 2;
Nb = 1;
PortalHeight = H;
Bayspan = L;
NumberStory = Ns;
NumberBay = Nb;
% Variable1
h = [0.8,1.00,1.20,1.40,1.6,1.80];
% Variable2
Lss = [2.00,2.40,2.80,3.20,3.60,4.00];
% Variable3
Nss = [2,3,4];
% Definition
Var1HeightofTrussBeam = h;
Var2LengthSpecialSegment = Lss;
Var3NumberSpecialSegment = Nss;
% % Xbase = zeros(1,length(Totalvariant));
% % Zbase = zeros(1,length(Totalvariant));
% % Xcol = zeros(1,length(Totalvariant));
% % Zcol = zeros(1,length(Totalvariant));
% % Xos = zeros(1,length(Totalvariant));
% % Zos = zeros(1,length(Totalvariant));
% % Xss = zeros(1,length(Totalvariant));
% % Zss = zeros(1,length(Totalvariant));
% % X = zeros(1,length(Totalvariant));
% % Z = zeros(1,length(Totalvariant));
% % jointbase = zeros(1,length(Totalvariant));
% % jointcolumn = zeros(1,length(Totalvariant));
% % jointordinarysegment = zeros(1,length(Totalvariant));
% % jointtopordinarysegment = zeros(1,length(Totalvariant));
% % jointbottomordinarysegment = zeros(1,length(Totalvariant));
% % jointspecialsegment = zeros(1,length(Totalvariant));
% % jointtopspecialsegment = zeros(1,length(Totalvariant));
% % jointbottomspecialsegment = zeros(1,length(Totalvariant));
ijk = 0;
for i = 1:numel(h)
for j = 1:numel(Lss)
for k = 1:numel(Nss)
ijk = ijk+1;
Variantmodel{ijk,:} = table(ijk,h(i),Lss(j),Nss(k),'VariableNames',{'VariantID','Height','Length','Number'});
%% Base(base)
Xbase{ijk,:} = L*(0:NumberBay);
Zbase{ijk,:} = repelem(0,1,length(Xbase{ijk,:}));
%% Column(col)
Xcolumn = L*(0:NumberBay);
Zcolumn = repelem(H*(1:NumberStory),1,length(Xcolumn));
Xbotbeam = L*(0:NumberBay);
Zbotbeam = repelem((H*(1:NumberStory)-h(i)),1,length(Xbotbeam));
% replicate [X] to be the same size as [Z] for plotting:
Xcol{ijk,:} = repmat([Xcolumn,Xbotbeam],1,NumberStory);
Zcol{ijk,:} = [Zcolumn,Zbotbeam];
%% Ordinary Segment
% calculate span length of ordinary segment
Los = (L-Lss(j))/2;
Nos = Los/h(i);
Nos = round(Nos);
los = Los/Nos;
totalspan{ijk,:} = los*Nos*2+Lss(j);
if totalspan{ijk,:} == 15.000
checkspan{ijk,:} = "correct span";
else
checkspan{ijk,:} = "span must be 15m";
end
% top and bottom joint of ordinary segment(os)
XTopOrdinarySegment = reshape([los*(1:Nos),(L/2+Lss(j)/2)+los*(0:Nos-1)].'+L*(0:(NumberBay-1)),1,[]);
XBottomOrdinarySegment = XTopOrdinarySegment;
ZTopOrdinarySegment = repelem(H*(1:NumberStory),1,2*Nos*NumberBay);
ZBottomOrdinarySegment = repelem(H*(1:NumberStory)-h(i),1,2*Nos*NumberBay);
% replicate [X] to be the same size as [Z] for plotting:
Xos{ijk,:} = repmat([XTopOrdinarySegment,XBottomOrdinarySegment],1,NumberStory);
Zos{ijk,:} = [ZTopOrdinarySegment,ZBottomOrdinarySegment];
%% Special Segment
% calculate span length of special segment
lss = Lss(j)/Nss(k);
% top and bottom joint of special segment(ss)
XTopSpecialSegment = reshape((lss*(0:Nss(k))+L/2-Lss(j)/2).'+L*(0:(NumberBay-1)),1,[]);
XBottomSpecialSegment = XTopSpecialSegment;
ZTopSpecialSegment = repelem(H*(1:NumberStory),1,length(XTopSpecialSegment));
ZBottomSpecialSegment = repelem(H*(1:NumberStory)-h(i),1,length(XBottomSpecialSegment));
% replicate [X] to be the same size as [Z] for plotting:
Xss{ijk,:} = repmat([XTopSpecialSegment,XBottomSpecialSegment],1,NumberStory);
Zss{ijk,:} = [ZTopSpecialSegment,ZBottomSpecialSegment];
%% Plot Joint
X{ijk,:} = [Xbase{ijk,:},Xcol{ijk,:},Xos{ijk,:},Xss{ijk,:}];
Z{ijk,:} = [Zbase{ijk,:},Zcol{ijk,:},Zos{ijk,:},Zss{ijk,:}];
scatter(X{ijk,:},Z{ijk,:},'filled'),grid on
%check angle
tangent = (Lss(j)/Nss(k))/h(i);
anglespecialsegment(ijk) = atand(tangent);
%% Name Joint
jointbase{ijk} = table((1:numel(Xbase{ijk,:}))',Xbase{ijk,:}',Zbase{ijk,:}','VariableNames',{'ID','X','Z'});
jointcolumn{ijk} = table((max(jointbase{ijk}.ID)+1:numel(Xcol{ijk,:})+max(jointbase{ijk}.ID))',Xcol{ijk,:}',Zcol{ijk,:}','VariableNames',{'ID','X','Z'});
jointordinarysegment{ijk} = table((max(jointcolumn{ijk}.ID)+1:numel(Xos{ijk,:})+max(jointcolumn{ijk}.ID))',Xos{ijk,:}',Zos{ijk,:}','VariableNames',{'ID','X','Z'});
jointtopordinarysegment{ijk} = jointordinarysegment{ijk}(ismember(jointordinarysegment{ijk}.Z,Zcolumn),:);
jointbottomordinarysegment{ijk} = jointordinarysegment{ijk}(ismember(jointordinarysegment{ijk}.Z,Zbotbeam),:);
jointspecialsegment{ijk} = table((max(jointbottomordinarysegment{ijk}.ID)+1:numel(Xss{ijk,:})+max(jointbottomordinarysegment{ijk}.ID))',Xss{ijk,:}',Zss{ijk,:}','VariableNames',{'ID','X','Z'});
jointtopspecialsegment{ijk} = jointspecialsegment{ijk}(ismember(jointspecialsegment{ijk}.Z,Zcolumn),:);
jointbottomspecialsegment{ijk} = jointspecialsegment{ijk}(ismember(jointspecialsegment{ijk}.Z,Zbotbeam),:);
end
end
end
%% Verify Variants Which Passed the Angle Requirement
tablecheck = table((1:numel(anglespecialsegment))',totalspan,anglespecialsegment','VariableNames',{'VariantID','Total Span','Angle'});
VariantIDPassed = tablecheck.VariantID(tablecheck.Angle>=30 & tablecheck.Angle<=60);
jointbase = table((1:numel(jointbase))',jointbase','VariableNames',{'VariantID','Joint Base'});
jointbase = jointbase(ismember(jointbase.VariantID,VariantIDPassed),:);
jointcolumn = table((1:numel(jointcolumn))',jointcolumn','VariableNames',{'VariantID','Joint Column'});
jointcolumn = jointcolumn(ismember(jointcolumn.VariantID,VariantIDPassed),:);
jointtopordinarysegment = table((1:numel(jointtopordinarysegment))',jointtopordinarysegment','VariableNames',{'VariantID','Joint Top Ordinary Segment'});
jointtopordinarysegment = jointtopordinarysegment(ismember(jointtopordinarysegment.VariantID,VariantIDPassed),:);
jointbottomordinarysegment = table((1:numel(jointbottomordinarysegment))',jointbottomordinarysegment','VariableNames',{'VariantID','Joint Bottom Ordinary Segment'});
jointbottomordinarysegment = jointbottomordinarysegment(ismember(jointbottomordinarysegment.VariantID,VariantIDPassed),:);
jointtopspecialsegment = table((1:numel(jointtopspecialsegment))',jointtopspecialsegment','VariableNames',{'VariantID','Joint Top Special Segment'});
jointtopspecialsegment = jointtopspecialsegment(ismember(jointtopspecialsegment.VariantID,VariantIDPassed),:);
jointbottomspecialsegment = table((1:numel(jointbottomspecialsegment))',jointbottomspecialsegment','VariableNames',{'VariantID','Joint Bottom Special Segment'});
jointbottomspecialsegment = jointbottomspecialsegment(ismember(jointbottomspecialsegment.VariantID,VariantIDPassed),:);
N = height(jointbottomspecialsegment);
txtline = strings(N,1);
for i = 1:N
T = jointbottomspecialsegment.("Joint Bottom Special Segment"){i};
M = T{:,:};
M(:,end+[1 2]) = M(:,[2 3]); % duplicate columns 2 and 3 into columns 4 and 5
txtline(i) = sprintf(" Joint=%d CoordSys=GLOBAL CoordType=Cartesian XorR=%d Y=0 Z=%d SpecialJt=No GlobalX=%d GlobalY=0 GlobalZ=%d\n",M.');
end
txtline(1)
ans =
" Joint=81 CoordSys=GLOBAL CoordType=Cartesian XorR=6.500000e+00 Y=0 Z=4.200000e+00 SpecialJt=No GlobalX=6.500000e+00 GlobalY=0 GlobalZ=4.200000e+00 Joint=82 CoordSys=GLOBAL CoordType=Cartesian XorR=7.500000e+00 Y=0 Z=4.200000e+00 SpecialJt=No GlobalX=7.500000e+00 GlobalY=0 GlobalZ=4.200000e+00 Joint=83 CoordSys=GLOBAL CoordType=Cartesian XorR=8.500000e+00 Y=0 Z=4.200000e+00 SpecialJt=No GlobalX=8.500000e+00 GlobalY=0 GlobalZ=4.200000e+00 Joint=84 CoordSys=GLOBAL CoordType=Cartesian XorR=6.500000e+00 Y=0 Z=9.200000e+00 SpecialJt=No GlobalX=6.500000e+00 GlobalY=0 GlobalZ=9.200000e+00 Joint=85 CoordSys=GLOBAL CoordType=Cartesian XorR=7.500000e+00 Y=0 Z=9.200000e+00 SpecialJt=No GlobalX=7.500000e+00 GlobalY=0 GlobalZ=9.200000e+00 Joint=86 CoordSys=GLOBAL CoordType=Cartesian XorR=8.500000e+00 Y=0 Z=9.200000e+00 SpecialJt=No GlobalX=8.500000e+00 GlobalY=0 GlobalZ=9.200000e+00 "
txtline(2)
ans =
" Joint=83 CoordSys=GLOBAL CoordType=Cartesian XorR=6.500000e+00 Y=0 Z=4.200000e+00 SpecialJt=No GlobalX=6.500000e+00 GlobalY=0 GlobalZ=4.200000e+00 Joint=84 CoordSys=GLOBAL CoordType=Cartesian XorR=7.166667e+00 Y=0 Z=4.200000e+00 SpecialJt=No GlobalX=7.166667e+00 GlobalY=0 GlobalZ=4.200000e+00 Joint=85 CoordSys=GLOBAL CoordType=Cartesian XorR=7.833333e+00 Y=0 Z=4.200000e+00 SpecialJt=No GlobalX=7.833333e+00 GlobalY=0 GlobalZ=4.200000e+00 Joint=86 CoordSys=GLOBAL CoordType=Cartesian XorR=8.500000e+00 Y=0 Z=4.200000e+00 SpecialJt=No GlobalX=8.500000e+00 GlobalY=0 GlobalZ=4.200000e+00 Joint=87 CoordSys=GLOBAL CoordType=Cartesian XorR=6.500000e+00 Y=0 Z=9.200000e+00 SpecialJt=No GlobalX=6.500000e+00 GlobalY=0 GlobalZ=9.200000e+00 Joint=88 CoordSys=GLOBAL CoordType=Cartesian XorR=7.166667e+00 Y=0 Z=9.200000e+00 SpecialJt=No GlobalX=7.166667e+00 GlobalY=0 GlobalZ=9.200000e+00 Joint=89 CoordSys=GLOBAL CoordType=Cartesian XorR=7.833333e+00 Y=0 Z=9.200000e+00 SpecialJt=No GlobalX=7.833333e+00 GlobalY=0 GlobalZ=9.200000e+00 Joint=90 CoordSys=GLOBAL CoordType=Cartesian XorR=8.500000e+00 Y=0 Z=9.200000e+00 SpecialJt=No GlobalX=8.500000e+00 GlobalY=0 GlobalZ=9.200000e+00 "
Then you would write each element of txtline to a different file, e.g., by using writelines in a loop.
for i = 1:N
file_name = "file" + i + ".txt";
writelines(txtline(i),file_name);
end

Sign in to comment.

More Answers (0)

Categories

Find more on Geographic Plots in Help Center and File Exchange

Tags

Products

Community Treasure Hunt

Find the treasures in MATLAB Central and discover how the community can help you!

Start Hunting!