Fixation probability on the complete graph with dB updating

FixprobcompdB[fp_,f_,N_]:=((N-1)/N)((1-(f/fp))/(1-((((f/fp)))^(N-1))));

Fixation probability for star graph : temperature initialised (parent moving) dB

The formulae for the dB fixation probability on the star graph have been computed in SI Appendix A .

FixprobstartempdB[fp_,f_,N_]:=(((1+(N-1) (fp/f)) (((((N-1))^2)/N)+((fp/f)/(-1+N-1+2 (fp/f)))))/((N-1)*N (1+(fp/f))));

Plot[{FixprobcompdB[fp,1,10],FixprobstartempdB[fp,1,10]},{fp,.1,10},PlotRange->{-.02,1.1},  PlotStyle->{{Thickness[0.01],Blue},{Thickness[0.01],Orange}},Frame->True,FrameStyle->Directive[Black,Thickness[0.004]],FrameTicks->{{Automatic,Automatic},{Automatic, Automatic}}, GridLines->{{1},None},GridLinesStyle->Directive[Black,Thickness[0.003]],Background->None, PlotRange->All, FrameLabel->{Style["Mutant's fitness",18,Black],Style["Fixation probability",18,Black]},FrameTicksStyle->12]

Plot[{FixprobcompdB[fp,1,50],FixprobstartempdB[fp,1,50]},{fp,.1,10},PlotRange->{-.02,1.1},  PlotStyle->{{Thickness[0.01],Blue},{Thickness[0.01],Orange}},Frame->True,FrameStyle->Directive[Black,Thickness[0.004]],FrameTicks->{{Automatic,Automatic},{Automatic, Automatic}}, GridLines->{{1},None},GridLinesStyle->Directive[Black,Thickness[0.003]],Background->None, PlotRange->All, FrameLabel->{Style["Mutant's fitness",18,Black],Style["Fixation probability",18,Black]},FrameTicksStyle->12]