\documentclass[tikz,border=5pt]{standalone}
\usepackage{xcolor}
\usepackage{tikz}
\usepackage{amsmath}
\usepackage{pgfplots}
\pgfplotsset{compat=newest}
\usetikzlibrary{plotmarks,arrows.meta}
\begin{document}
\begin{tikzpicture}
\begin{axis}[
width=4.755in,
height=4.338in,
at={(0.798in,0.586in)},
scale only axis,
xmin=-10,
xmax=30,
xlabel style={font=\color{white!15!black}},
xlabel={Transmit Power [dBm]},
ymode=log,
ymin=1e-07,
ymax=1,
yminorticks=true,
ylabel style={font=\color{white!15!black}},
ylabel={Average BER},
axis background/.style={fill=white},
xmajorgrids,
ymajorgrids,
yminorgrids,
legend style={at={(0.03,0.03)}, anchor=south west, legend cell align=left, align=left, draw=white!15!black}
]
\addplot [color=red, line width=1.5pt, mark size=4.5pt, mark=o, mark options={solid, red}]
table[row sep=crcr]{
-10 0.412960583381554\\
-7.89473684210526 0.389833936455393\\
-5.78947368421053 0.361132115180962\\
-3.68421052631579 0.326133984643376\\
-1.57894736842105 0.284386862198929\\
0.526315789473683 0.236574447490394\\
2.63157894736842 0.184770734079652\\
4.73684210526316 0.132784248229473\\
6.84210526315789 0.0860979251500881\\
8.94736842105263 0.0493716102806012\\
11.0526315789474 0.0246921975434759\\
13.1578947368421 0.0106497569494601\\
15.2631578947368 0.00405721824088216\\
17.3684210526316 0.00132687584612256\\
19.4736842105263 0.000409659908082573\\
21.5789473684211 0.000112698099015549\\
23.6842105263158 2.94995414443055e-05\\
25.7894736842105 6.06597594897047e-06\\
27.8947368421053 8.0518536212639e-07\\
30 1.06256821731747e-07\\
};
\addlegendentry{Simulation}
\addplot [color=blue, dashed, line width=1.5pt]
table[row sep=crcr]{
-10 0.413659651059979\\
-7.89473684210526 0.39040014764053\\
-5.78947368421053 0.361438066047375\\
-3.68421052631579 0.325980680677582\\
-1.57894736842105 0.28370998793026\\
0.526315789473683 0.235320581348887\\
2.63157894736842 0.18314816441454\\
4.73684210526316 0.131469610301987\\
6.84210526315789 0.0857613629640563\\
8.94736842105263 0.0506005369522262\\
11.0526315789474 0.0274031154924156\\
13.1578947368421 0.0141438547450255\\
15.2631578947368 0.00731549385109166\\
17.3684210526316 0.00395548135690159\\
19.4736842105263 0.00228259948988392\\
21.5789473684211 0.00140702497497105\\
23.6842105263158 0.00091771491251411\\
25.7894736842105 0.00062586191414427\\
27.8947368421053 0.000441554211151547\\
30 0.000319562771558367\\
};
\addlegendentry{Gaussian}
\addplot [color=black!50!green, dashdotted, line width=1.5pt]
table[row sep=crcr]{
-10 0.412249845154583\\
-7.89473684210526 0.389010183751559\\
-5.78947368421053 0.360065366361935\\
-3.68421052631579 0.324624768489515\\
-1.57894736842105 0.282369577602859\\
0.526315789473683 0.233971758840888\\
2.63157894736842 0.181684388398089\\
4.73684210526316 0.129617891793889\\
6.84210526315789 0.0830947054223877\\
8.94736842105263 0.0468185998079493\\
11.0526315789474 0.0227493055208578\\
13.1578947368421 0.00941235783707156\\
15.2631578947368 0.00330042799999003\\
17.3684210526316 0.000984120445384512\\
19.4736842105263 0.000252046724883688\\
21.5789473684211 5.62547806691758e-05\\
23.6842105263158 1.11265318912465e-05\\
25.7894736842105 1.98409432218811e-06\\
27.8947368421053 3.24270813087081e-07\\
30 4.93036180623061e-08\\
};
\addlegendentry{Gamma}
\addplot [color=black, line width=1.5pt]
table[row sep=crcr]{
-10 148140562400.668\\
-7.89473684210526 16774890081.0703\\
-5.78947368421053 1899526589.28695\\
-3.68421052631579 215095374.453737\\
-1.57894736842105 24356605.6786606\\
0.526315789473683 2758052.05803419\\
2.63157894736842 312311.627292597\\
4.73684210526316 35365.0150503944\\
6.84210526315789 4004.60367216134\\
8.94736842105263 453.466527533947\\
11.0526315789474 51.3488745523508\\
13.1578947368421 5.81455688059725\\
15.2631578947368 0.658418943208428\\
17.3684210526316 0.074556929045154\\
19.4736842105263 0.00844255124489103\\
21.5789473684211 0.000956003317672104\\
23.6842105263158 0.000108254284385083\\
25.7894736842105 1.22583152914809e-05\\
27.8947368421053 1.3880863435467e-06\\
30 1.57181770196423e-07\\
};
\addlegendentry{Asymptotic}
\addplot [color=red, line width=1.5pt, mark size=4.5pt, mark=o, mark options={solid, red}, forget plot]
table[row sep=crcr]{
-10 0.379127021632135\\
-7.89473684210526 0.347912955192125\\
-5.78947368421053 0.310042552762095\\
-3.68421052631579 0.265496877543814\\
-1.57894736842105 0.215258188707069\\
0.526315789473683 0.162205998592901\\
2.63157894736842 0.111016002824993\\
4.73684210526316 0.06751188150361\\
6.84210526315789 0.035640635078536\\
8.94736842105263 0.0162333945737977\\
11.0526315789474 0.00636662679982135\\
13.1578947368421 0.00218497986472821\\
15.2631578947368 0.000664080937322832\\
17.3684210526316 0.000190251949806958\\
19.4736842105263 4.66523500182824e-05\\
21.5789473684211 1.11836487172146e-05\\
23.6842105263158 1.65348252577949e-06\\
25.7894736842105 1.76081872153333e-07\\
27.8947368421053 1.5828319761212e-08\\
30 1.83392568226726e-09\\
};
\addplot [color=blue, dashed, line width=1.5pt, forget plot]
table[row sep=crcr]{
-10 0.37970500685751\\
-7.89473684210526 0.348210665394029\\
-5.78947368421053 0.309958648411878\\
-3.68421052631579 0.26491846161444\\
-1.57894736842105 0.214321011012736\\
0.526315789473683 0.161261163481661\\
2.63157894736842 0.11073009809085\\
4.73684210526316 0.068340277501479\\
6.84210526315789 0.0378303415245882\\
8.94736842105263 0.0191840132954823\\
11.0526315789474 0.00933452418258163\\
13.1578947368421 0.00461308109423763\\
15.2631578947368 0.00241894027312678\\
17.3684210526316 0.00136998550398428\\
19.4736842105263 0.00083531168378541\\
21.5789473684211 0.000541390241337243\\
23.6842105263158 0.000367839033378807\\
25.7894736842105 0.000258922246770863\\
27.8947368421053 0.000187115380430355\\
30 0.00013790016990656\\
};
\addplot [color=black!50!green, dashdotted, line width=1.5pt, forget plot]
table[row sep=crcr]{
-10 0.378238029106831\\
-7.89473684210526 0.346732806208973\\
-5.78947368421053 0.30846209071211\\
-3.68421052631579 0.263392917990896\\
-1.57894736842105 0.212729529847935\\
0.526315789473683 0.15948146406012\\
2.63157894736842 0.108496290874818\\
4.73684210526316 0.0653232742588707\\
6.84210526315789 0.0339615250956484\\
8.94736842105263 0.0149372005073835\\
11.0526315789474 0.00548553505043243\\
13.1578947368421 0.00167536959320557\\
15.2631578947368 0.000427648445299657\\
17.3684210526316 9.23385229006165e-05\\
19.4736842105263 1.71492252061682e-05\\
21.5789473684211 2.79173115436863e-06\\
23.6842105263158 4.060601387207e-07\\
25.7894736842105 5.37361127935103e-08\\
27.8947368421053 6.57658960984143e-09\\
30 7.55061532988295e-10\\
};
\addplot [color=black, line width=1.5pt, forget plot]
table[row sep=crcr]{
-10 2955792814.76349\\
-7.89473684210526 334703060.165049\\
-5.78947368421053 37900538.1988561\\
-3.68421052631579 4291716.94771661\\
-1.57894736842105 485978.174311886\\
0.526315789473683 55030.3733411798\\
2.63157894736842 6231.43620463526\\
4.73684210526316 705.624817983592\\
6.84210526315789 79.9023479344952\\
8.94736842105263 9.04784673488283\\
11.0526315789474 1.0245447431037\\
13.1578947368421 0.116015662220987\\
15.2631578947368 0.0131371850484541\\
17.3684210526316 0.00148760630843604\\
19.4736842105263 0.000168451043411247\\
21.5789473684211 1.90747739273637e-05\\
23.6842105263158 2.15995694067481e-06\\
25.7894736842105 2.44585545460986e-07\\
27.8947368421053 2.76959637120169e-08\\
30 3.13618862673022e-09\\
};
\addplot [color=red, line width=1.5pt, mark size=4.5pt, mark=o, mark options={solid, red}, forget plot]
table[row sep=crcr]{
-10 0.315105201184563\\
-7.89473684210526 0.271034594359896\\
-5.78947368421053 0.221135082757717\\
-3.68421052631579 0.167867903231104\\
-1.57894736842105 0.11577465134869\\
0.526315789473683 0.0708081784388187\\
2.63157894736842 0.0374473601300585\\
4.73684210526316 0.0170570929954483\\
6.84210526315789 0.00661318955994361\\
8.94736842105263 0.00224278205405023\\
11.0526315789474 0.000685856244941584\\
13.1578947368421 0.000184904396726955\\
15.2631578947368 5.11976296029556e-05\\
17.3684210526316 1.0036872212675e-05\\
19.4736842105263 1.41694098891672e-06\\
21.5789473684211 1.25191491838326e-07\\
23.6842105263158 1.06311068630016e-08\\
25.7894736842105 1.16108675718886e-09\\
27.8947368421053 1.61685324176288e-10\\
30 1.96297080810559e-12\\
};
\addplot [color=blue, dashed, line width=1.5pt, forget plot]
table[row sep=crcr]{
-10 0.315177903282876\\
-7.89473684210526 0.270844221050291\\
-5.78947368421053 0.220605557727416\\
-3.68421052631579 0.167280705942109\\
-1.57894736842105 0.115697692138741\\
0.526315789473683 0.0716435588161609\\
2.63157894736842 0.0394071922321516\\
4.73684210526316 0.0195357435160232\\
6.84210526315789 0.00911496891536349\\
8.94736842105263 0.00425793422819394\\
11.0526315789474 0.00210362562792223\\
13.1578947368421 0.00113007645531382\\
15.2631578947368 0.000660790312230925\\
17.3684210526316 0.000415130233606606\\
19.4736842105263 0.000275735080234167\\
21.5789473684211 0.000190933694449043\\
23.6842105263158 0.000136344668654103\\
25.7894736842105 9.96050435959951e-05\\
27.8947368421053 7.40090447325954e-05\\
30 5.56942115098932e-05\\
};
\addplot [color=black!50!green, dashdotted, line width=1.5pt, forget plot]
table[row sep=crcr]{
-10 0.313607405078703\\
-7.89473684210526 0.269224129278743\\
-5.78947368421053 0.218910098494407\\
-3.68421052631579 0.165427611998849\\
-1.57894736842105 0.113492881397434\\
0.526315789473683 0.0688211387589497\\
2.63157894736842 0.0358865333350019\\
4.73684210526316 0.0157042857194582\\
6.84210526315789 0.00566838014815445\\
8.94736842105263 0.00167458704681751\\
11.0526315789474 0.000405868637331894\\
13.1578947368421 8.15879687263836e-05\\
15.2631578947368 1.38341247819912e-05\\
17.3684210526316 2.01872554048273e-06\\
19.4736842105263 2.58884758791308e-07\\
21.5789473684211 2.9772702756561e-08\\
23.6842105263158 3.12777983926178e-09\\
25.7894736842105 3.05085093846844e-10\\
27.8947368421053 2.80167387739734e-11\\
30 2.45073667940002e-12\\
};
\addplot [color=black, line width=1.5pt, forget plot]
table[row sep=crcr]{
-10 29557928.1476349\\
-7.89473684210526 3347030.60165049\\
-5.78947368421053 379005.381988561\\
-3.68421052631579 42917.1694771661\\
-1.57894736842105 4859.78174311886\\
0.526315789473683 550.303733411798\\
2.63157894736842 62.3143620463525\\
4.73684210526316 7.05624817983592\\
6.84210526315789 0.799023479344952\\
8.94736842105263 0.0904784673488283\\
11.0526315789474 0.010245447431037\\
13.1578947368421 0.00116015662220987\\
15.2631578947368 0.000131371850484541\\
17.3684210526316 1.48760630843604e-05\\
19.4736842105263 1.68451043411247e-06\\
21.5789473684211 1.90747739273637e-07\\
23.6842105263158 2.1599569406748e-08\\
25.7894736842105 2.44585545460986e-09\\
27.8947368421053 2.76959637120168e-10\\
30 3.13618862673022e-11\\
};
\addplot [color=red, line width=1.5pt, mark size=4.5pt, mark=o, mark options={solid, red}, forget plot]
table[row sep=crcr]{
-10 0.447664105858385\\
-7.89473684210526 0.433505415396357\\
-5.78947368421053 0.415718630434422\\
-3.68421052631579 0.393286741764639\\
-1.57894736842105 0.36565720969151\\
0.526315789473683 0.331916108284097\\
2.63157894736842 0.29203561676262\\
4.73684210526316 0.246245434508952\\
6.84210526315789 0.196649518218976\\
8.94736842105263 0.146968193118527\\
11.0526315789474 0.101117538610931\\
13.1578947368421 0.0635434659001936\\
15.2631578947368 0.0360651811419131\\
17.3684210526316 0.0184946413173667\\
19.4736842105263 0.00857856392343294\\
21.5789473684211 0.00365331692181279\\
23.6842105263158 0.00140101001516218\\
25.7894736842105 0.000505303165132887\\
27.8947368421053 0.000170237912743452\\
30 5.47409590176512e-05\\
};
\end{axis}
\begin{axis}[
width=6.135in,
height=5.323in,
at={(0in,0in)},
scale only axis,
xmin=0,
xmax=1,
ymin=0,
ymax=1,
axis line style={draw=none},
ticks=none,
axis x line*=bottom,
axis y line*=left
]
\draw [black, line width=1.0pt] (axis cs:0.333833,0.792521) ellipse [x radius=0.0159609, y radius=0.0120627];
\draw [black, line width=1.0pt] (axis cs:0.497414,0.718938) ellipse [x radius=0.0159609, y radius=0.0120627];
\draw [black, line width=1.0pt] (axis cs:0.456261,0.802171) ellipse [x radius=0.0159609, y radius=0.0120627];
\draw[-{Stealth}, color=black] (axis cs:0.21,0.79) node[fill=white] {$N=400$} -- (axis cs:0.311,0.79);
\draw[-{Stealth}, color=black] (axis cs:0.3,0.714) node[fill=white] {$N=200$} -- (axis cs:0.474,0.714) ;
\draw[-{Stealth}, color=black] (axis cs:0.75,0.804) node[fill=white] {$N=100$} -- (axis cs:0.474,0.804);
\draw[-{Stealth}, color=black] (axis cs:0.8,0.72) node[fill=white] {Without RIS} -- (axis cs:0.747,0.656);
\end{axis}
\end{tikzpicture}
\end{document}