Muszę przyspieszyć tę wbudowaną pętlę, jak mogę to zrobić?

for(M_P in 0:9)
{
for(M_D in 0:(9-M_P))
{
for(M_A in 0:(9-M_P-M_D))
{
  for(M_CC in 0:(9-M_P-M_D-M_A))
  {
    for(M_CD in (9-M_P-M_D-M_A-M_CC))
    {


      for(G_D in 0:9)
      {
        for(G_A in 0:(9-G_D))
        {
          for(G_CC in 0:(9-G_D-G_A))
          {
            for(G_CD in (9-G_D-G_A-G_CC))
            {


              for(S_D in 0:9)
              {
                for(S_A in 0:(9-S_D))
                {
                  for(S_CC in 0:(9-S_D-S_A))
                  {
                    for(S_CD in (9-S_D-S_A-S_CC))
                    {


                      for(Q_P in 0:3)
                      {
                        for(Q_D in 0:(3-Q_P))
                        {
                          for(Q_A in 0:(3-Q_P-Q_D))
                          {
                            for(Q_CC in 0:(3-Q_P-Q_D-Q_A))
                            {
                              for(Q_CD in (3-Q_P-Q_D-Q_A-Q_CC))
                              {

Obliczanie, jak to zrobić, trwa wieczność? Jestem tylko początkującym, ale słyszałem, że może być coś z aplikacją lub też z wieloma rdzeniami, mam 4 punkty, używam Rstudio, proszę mi pomóc. Dziękuję mężczyznom!

PS: powiedz mi, czy potrzebujesz reszty kodu, ale jest to proste obliczenie za pomocą * i + przy użyciu wszystkich M_P, M_D itd. Jeśli zostawiam go na noc, czy ma to szansę na zakończenie? Chciałbym dodać kilka pętli, więc musiałbym zrobić to wszystko jeszcze 3 lub 10 razy: s