Mass Spectra for the (Subscript[m, q])=0 Limit

mρs={};
fρs={};
fπs={};

nf={1,2,3,4,5,6,7,8,9,10};

AppendTo[mρs,Vmass1];
AppendTo[fρs,(Sqrt[fvsq1])];
AppendTo[fπs,(Sqrt[fpisq1])];
mρs
fρs
fπs

mρf={};
fρf={};
fπf={};

AppendTo[mρf,Vmass];
AppendTo[fρf,(Sqrt[fvsq])];
AppendTo[fπf,(Sqrt[fpisq])];
mρf
fρf
fπf

mσs={};
mas={};
fσs={};
fas={};

AppendTo[mσs,Smass1];
AppendTo[mas,Amass1];
AppendTo[fσs,(Sqrt[fssq1])];
AppendTo[fas,(Sqrt[fasq1])];
mσs
mas
fσs
fas

mσf={};
maf={};
fσf={};
faf={};

AppendTo[mσf,Smass];
AppendTo[maf,Amass];
AppendTo[fσf,(Sqrt[fssq])];
AppendTo[faf,(Sqrt[fasq])];
mσf
maf
fσf
faf

Show[ListPlot[{Table[{nf[[i]],((mρs[[i]])/(mρs[[i]]))},{i,1,Dimensions[nf][[1]],1}],Table[{nf[[i]],((mρf[[i]])/(mρs[[i]]))},{i,1,Dimensions[nf][[1]],1}],Table[{nf[[i]],((mσs[[i]])/(mρs[[i]]))},{i,1,Dimensions[nf][[1]],1}],Table[{nf[[i]],((mσf[[i]])/(mρs[[i]]))},{i,1,Dimensions[nf][[1]],1}],Table[{nf[[i]],((mas[[i]])/(mρs[[i]]))},{i,1,Dimensions[nf][[1]],1}],Table[{nf[[i]],((maf[[i]])/(mρs[[i]]))},{i,1,Dimensions[nf][[1]],1}]}],ListPlot[{Table[{nf[[i]],((mρs[[i]])/(mρs[[i]]))},{i,1,Dimensions[nf][[1]],1}],Table[{nf[[i]],((mρf[[i]])/(mρs[[i]]))},{i,1,Dimensions[nf][[1]],1}],Table[{nf[[i]],((mσs[[i]])/(mρs[[i]]))},{i,1,Dimensions[nf][[1]],1}],Table[{nf[[i]],((mσf[[i]])/(mρs[[i]]))},{i,1,Dimensions[nf][[1]],1}],Table[{nf[[i]],((mas[[i]])/(mρs[[i]]))},{i,1,Dimensions[nf][[1]],1}],Table[{nf[[i]],((maf[[i]])/(mρs[[i]]))},{i,1,Dimensions[nf][[1]],1}]},Joined->True],AxesOrigin->{1,0},AxesLabel->{(Subscript[N, f]),M},PlotRange->All,ImageSize->Large]
(*blue is the ρ symmetric, ochre is the ρ fundamental, green is the σ symmetric, orange is the σ fundamental, purple is the axial symmetric, brown is the axial fundamental*)

Show[ListLogPlot[{Table[{nf[[i]],((fρs[[i]])/(mρs[[i]]))},{i,1,Dimensions[nf][[1]],1}],Table[{nf[[i]],((fρf[[i]])/(mρs[[i]]))},{i,1,Dimensions[nf][[1]],1}],Table[{nf[[i]],((fσs[[i]])/(mρs[[i]]))},{i,1,Dimensions[nf][[1]],1}],Table[{nf[[i]],((fσf[[i]])/(mρs[[i]]))},{i,1,Dimensions[nf][[1]],1}],Table[{nf[[i]],((fas[[i]])/(mρs[[i]]))},{i,1,Dimensions[nf][[1]],1}],Table[{nf[[i]],((faf[[i]])/(mρs[[i]]))},{i,1,Dimensions[nf][[1]],1}],Table[{nf[[i]],((fπs[[i]])/(mρs[[i]]))},{i,1,Dimensions[nf][[1]],1}],Table[{nf[[i]],((fπf[[i]])/(mρs[[i]]))},{i,1,Dimensions[nf][[1]],1}]}],ListLogPlot[{Table[{nf[[i]],((fρs[[i]])/(mρs[[i]]))},{i,1,Dimensions[nf][[1]],1}],Table[{nf[[i]],((fρf[[i]])/(mρs[[i]]))},{i,1,Dimensions[nf][[1]],1}],Table[{nf[[i]],((fσs[[i]])/(mρs[[i]]))},{i,1,Dimensions[nf][[1]],1}],Table[{nf[[i]],((fσf[[i]])/(mρs[[i]]))},{i,1,Dimensions[nf][[1]],1}],Table[{nf[[i]],((fas[[i]])/(mρs[[i]]))},{i,1,Dimensions[nf][[1]],1}],Table[{nf[[i]],((faf[[i]])/(mρs[[i]]))},{i,1,Dimensions[nf][[1]],1}],Table[{nf[[i]],((fπs[[i]])/(mρs[[i]]))},{i,1,Dimensions[nf][[1]],1}],Table[{nf[[i]],((fπf[[i]])/(mρs[[i]]))},{i,1,Dimensions[nf][[1]],1}]},Joined->True],AxesOrigin->{1,-5},AxesLabel->{(Subscript[N, f]),F},PlotRange->All,ImageSize->Large]
(*blue is the ρ symmetric, ochre is the ρ fundamental, green is the σ symmetric, orange is the σ fundamental, purple is the axial symmetric, brown is the axial fundamental, cyan is the π symmetric, yellow is the π fundamental*)

(*1*)(*nf*)
0.3
0.2
0.2

(*2*)
0.2
0.13
0.15

(*3*)
0.17
0.1
0.12

(*4*)
0.14
0.07
0.1

(*5*)
0.11
0.04
0.07

(*6*)
0.09
0.02
0.05

(*7*)
0.06
0.0022
0.023

(*Nf=8*)
0.03
0.00002
0.009

(*Nf=9*)
0.009
8.*(10^(-13))
0.002

(*Nf=10*)
0.00008
1.3*(10^(-13))
8.*(10^(-6))