Replacement using pattern matching?Highlighting text with StringReplacePart but also using Style, Subscriptreplacement rules from a pattern and a matching expressionString pattern matching & replacementHow to Make a change of variablesPattern matching & simple replacementTransformation rules to distinguish common variable with Subscript and OverBar $x,x^2,barx,barx^2, x_p,x_p^2, barx_p, barx^2_p $Pattern matching an expression involving TimesReplace custom functions, leave built in functions untouched?Symbol Level pattern matching and rule replacementHaving problems with using TableForm to format a table

Multi tool use
Multi tool use

Why do the i8080 I/O instructions take a byte-sized operand to determine the port?

Time complexity of an algorithm: Is it important to state the base of the logarithm?

Possibility of faking someone's public key

Storing voxels for a voxel Engine in C++

How to write numbers and percentage?

Who wrote “A writer only begins a book. A reader finishes it.”?

Why does FOO=bar; export the variable into my environment

Complications of displaced core material?

Are cells guaranteed to get at least one mitochondrion when they divide?

Did Game of Thrones end the way that George RR Martin intended?

Why this character is punished instead of being honoured?

Count all vowels in string

How do you earn the reader's trust?

Is this homebrew "Cactus Grenade" cantrip balanced?

Is a world with one country feeding everyone possible?

Why did it take so long for Germany to allow electric scooters / e-rollers on the roads?

If I arrive in the UK, and then head to mainland Europe, does my Schengen visa 90 day limit start when I arrived in the UK, or mainland Europe?

Why was this character made Grand Maester?

How does the Earth's center produce heat?

How would a developer who mostly fixed bugs for years at a company call out their contributions in their CV?

Local variables in DynamicModule affected by outside evaluation

Why does Bran want to find Drogon?

Question about Shemot, locusts

How to remove new line added by readarray when using a delimiter?



Replacement using pattern matching?


Highlighting text with StringReplacePart but also using Style, Subscriptreplacement rules from a pattern and a matching expressionString pattern matching & replacementHow to Make a change of variablesPattern matching & simple replacementTransformation rules to distinguish common variable with Subscript and OverBar $x,x^2,barx,barx^2, x_p,x_p^2, barx_p, barx^2_p $Pattern matching an expression involving TimesReplace custom functions, leave built in functions untouched?Symbol Level pattern matching and rule replacementHaving problems with using TableForm to format a table













1












$begingroup$


Starting with the expression



eq1 = 5 Exp[1 + 2 x + 3 x^2 + 4 x^3];


I want to implement the following transformation:



eq1 /. Exp[a_ x^2 + b_ x^3] -> f[a/b]


However, I am not getting the desired output
$5 f[3/4]exp(1+2 x)$.



Further, I also need to perform the following transformation.



eq2 = c Exp[a SuperStar[[Alpha]] + b [Alpha]];
eq2 /. d1_ Exp[d2 SuperStar[[Alpha]_]] -> f[d2]


I am providing the above expressions again in latex font for clarification.
$$
texteq2=c exp left(a alpha ^*+alpha bright);
$$



$$
texteq2text/., textd1$_$ exp left(alpha _^* textd2right)to f(textd2)
$$



Any help will be appreciated.










share|improve this question









$endgroup$
















    1












    $begingroup$


    Starting with the expression



    eq1 = 5 Exp[1 + 2 x + 3 x^2 + 4 x^3];


    I want to implement the following transformation:



    eq1 /. Exp[a_ x^2 + b_ x^3] -> f[a/b]


    However, I am not getting the desired output
    $5 f[3/4]exp(1+2 x)$.



    Further, I also need to perform the following transformation.



    eq2 = c Exp[a SuperStar[[Alpha]] + b [Alpha]];
    eq2 /. d1_ Exp[d2 SuperStar[[Alpha]_]] -> f[d2]


    I am providing the above expressions again in latex font for clarification.
    $$
    texteq2=c exp left(a alpha ^*+alpha bright);
    $$



    $$
    texteq2text/., textd1$_$ exp left(alpha _^* textd2right)to f(textd2)
    $$



    Any help will be appreciated.










    share|improve this question









    $endgroup$














      1












      1








      1





      $begingroup$


      Starting with the expression



      eq1 = 5 Exp[1 + 2 x + 3 x^2 + 4 x^3];


      I want to implement the following transformation:



      eq1 /. Exp[a_ x^2 + b_ x^3] -> f[a/b]


      However, I am not getting the desired output
      $5 f[3/4]exp(1+2 x)$.



      Further, I also need to perform the following transformation.



      eq2 = c Exp[a SuperStar[[Alpha]] + b [Alpha]];
      eq2 /. d1_ Exp[d2 SuperStar[[Alpha]_]] -> f[d2]


      I am providing the above expressions again in latex font for clarification.
      $$
      texteq2=c exp left(a alpha ^*+alpha bright);
      $$



      $$
      texteq2text/., textd1$_$ exp left(alpha _^* textd2right)to f(textd2)
      $$



      Any help will be appreciated.










      share|improve this question









      $endgroup$




      Starting with the expression



      eq1 = 5 Exp[1 + 2 x + 3 x^2 + 4 x^3];


      I want to implement the following transformation:



      eq1 /. Exp[a_ x^2 + b_ x^3] -> f[a/b]


      However, I am not getting the desired output
      $5 f[3/4]exp(1+2 x)$.



      Further, I also need to perform the following transformation.



      eq2 = c Exp[a SuperStar[[Alpha]] + b [Alpha]];
      eq2 /. d1_ Exp[d2 SuperStar[[Alpha]_]] -> f[d2]


      I am providing the above expressions again in latex font for clarification.
      $$
      texteq2=c exp left(a alpha ^*+alpha bright);
      $$



      $$
      texteq2text/., textd1$_$ exp left(alpha _^* textd2right)to f(textd2)
      $$



      Any help will be appreciated.







      pattern-matching replacement






      share|improve this question













      share|improve this question











      share|improve this question




      share|improve this question










      asked May 9 at 9:43









      Mark RobinsonMark Robinson

      1847




      1847




















          1 Answer
          1






          active

          oldest

          votes


















          5












          $begingroup$

          eq1 /. Exp[a_. x^2 + b_. x^3 + c_.] -> Exp[c] f[a/b]



          5 E^(1 + 2 x) f[3/4]




          eq2 /. d1_. Exp[d2_. SuperStar[α_] + d3_.] -> Exp[d3] f[d2]



          E^(b α) f[a]







          share|improve this answer











          $endgroup$








          • 2




            $begingroup$
            If you use defaults in the replacement pattern (dots after the patterns), they become more versatile: Exp[a_. x^2 + b_. x^3 + c_.] -> Exp[c] f[a/b]. This will also work with eq1a = 5 Exp[x^2 + 4 x^3], for example. Also, d1_. Exp[d2_. SuperStar[α_] + d3_.] -> Exp[d3] f[d2] for the second one.
            $endgroup$
            – Roman
            May 9 at 12:29











          • $begingroup$
            @Roman, great point. Updated with default patterns.
            $endgroup$
            – kglr
            May 9 at 12:49










          • $begingroup$
            @Shadowray, thank you; I added the needed _.s.
            $endgroup$
            – kglr
            May 9 at 13:52











          Your Answer








          StackExchange.ready(function()
          var channelOptions =
          tags: "".split(" "),
          id: "387"
          ;
          initTagRenderer("".split(" "), "".split(" "), channelOptions);

          StackExchange.using("externalEditor", function()
          // Have to fire editor after snippets, if snippets enabled
          if (StackExchange.settings.snippets.snippetsEnabled)
          StackExchange.using("snippets", function()
          createEditor();
          );

          else
          createEditor();

          );

          function createEditor()
          StackExchange.prepareEditor(
          heartbeatType: 'answer',
          autoActivateHeartbeat: false,
          convertImagesToLinks: false,
          noModals: true,
          showLowRepImageUploadWarning: true,
          reputationToPostImages: null,
          bindNavPrevention: true,
          postfix: "",
          imageUploader:
          brandingHtml: "Powered by u003ca class="icon-imgur-white" href="https://imgur.com/"u003eu003c/au003e",
          contentPolicyHtml: "User contributions licensed under u003ca href="https://creativecommons.org/licenses/by-sa/3.0/"u003ecc by-sa 3.0 with attribution requiredu003c/au003e u003ca href="https://stackoverflow.com/legal/content-policy"u003e(content policy)u003c/au003e",
          allowUrls: true
          ,
          onDemand: true,
          discardSelector: ".discard-answer"
          ,immediatelyShowMarkdownHelp:true
          );



          );













          draft saved

          draft discarded


















          StackExchange.ready(
          function ()
          StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fmathematica.stackexchange.com%2fquestions%2f197999%2freplacement-using-pattern-matching%23new-answer', 'question_page');

          );

          Post as a guest















          Required, but never shown

























          1 Answer
          1






          active

          oldest

          votes








          1 Answer
          1






          active

          oldest

          votes









          active

          oldest

          votes






          active

          oldest

          votes









          5












          $begingroup$

          eq1 /. Exp[a_. x^2 + b_. x^3 + c_.] -> Exp[c] f[a/b]



          5 E^(1 + 2 x) f[3/4]




          eq2 /. d1_. Exp[d2_. SuperStar[α_] + d3_.] -> Exp[d3] f[d2]



          E^(b α) f[a]







          share|improve this answer











          $endgroup$








          • 2




            $begingroup$
            If you use defaults in the replacement pattern (dots after the patterns), they become more versatile: Exp[a_. x^2 + b_. x^3 + c_.] -> Exp[c] f[a/b]. This will also work with eq1a = 5 Exp[x^2 + 4 x^3], for example. Also, d1_. Exp[d2_. SuperStar[α_] + d3_.] -> Exp[d3] f[d2] for the second one.
            $endgroup$
            – Roman
            May 9 at 12:29











          • $begingroup$
            @Roman, great point. Updated with default patterns.
            $endgroup$
            – kglr
            May 9 at 12:49










          • $begingroup$
            @Shadowray, thank you; I added the needed _.s.
            $endgroup$
            – kglr
            May 9 at 13:52















          5












          $begingroup$

          eq1 /. Exp[a_. x^2 + b_. x^3 + c_.] -> Exp[c] f[a/b]



          5 E^(1 + 2 x) f[3/4]




          eq2 /. d1_. Exp[d2_. SuperStar[α_] + d3_.] -> Exp[d3] f[d2]



          E^(b α) f[a]







          share|improve this answer











          $endgroup$








          • 2




            $begingroup$
            If you use defaults in the replacement pattern (dots after the patterns), they become more versatile: Exp[a_. x^2 + b_. x^3 + c_.] -> Exp[c] f[a/b]. This will also work with eq1a = 5 Exp[x^2 + 4 x^3], for example. Also, d1_. Exp[d2_. SuperStar[α_] + d3_.] -> Exp[d3] f[d2] for the second one.
            $endgroup$
            – Roman
            May 9 at 12:29











          • $begingroup$
            @Roman, great point. Updated with default patterns.
            $endgroup$
            – kglr
            May 9 at 12:49










          • $begingroup$
            @Shadowray, thank you; I added the needed _.s.
            $endgroup$
            – kglr
            May 9 at 13:52













          5












          5








          5





          $begingroup$

          eq1 /. Exp[a_. x^2 + b_. x^3 + c_.] -> Exp[c] f[a/b]



          5 E^(1 + 2 x) f[3/4]




          eq2 /. d1_. Exp[d2_. SuperStar[α_] + d3_.] -> Exp[d3] f[d2]



          E^(b α) f[a]







          share|improve this answer











          $endgroup$



          eq1 /. Exp[a_. x^2 + b_. x^3 + c_.] -> Exp[c] f[a/b]



          5 E^(1 + 2 x) f[3/4]




          eq2 /. d1_. Exp[d2_. SuperStar[α_] + d3_.] -> Exp[d3] f[d2]



          E^(b α) f[a]








          share|improve this answer














          share|improve this answer



          share|improve this answer








          edited May 9 at 13:51

























          answered May 9 at 9:56









          kglrkglr

          193k10214435




          193k10214435







          • 2




            $begingroup$
            If you use defaults in the replacement pattern (dots after the patterns), they become more versatile: Exp[a_. x^2 + b_. x^3 + c_.] -> Exp[c] f[a/b]. This will also work with eq1a = 5 Exp[x^2 + 4 x^3], for example. Also, d1_. Exp[d2_. SuperStar[α_] + d3_.] -> Exp[d3] f[d2] for the second one.
            $endgroup$
            – Roman
            May 9 at 12:29











          • $begingroup$
            @Roman, great point. Updated with default patterns.
            $endgroup$
            – kglr
            May 9 at 12:49










          • $begingroup$
            @Shadowray, thank you; I added the needed _.s.
            $endgroup$
            – kglr
            May 9 at 13:52












          • 2




            $begingroup$
            If you use defaults in the replacement pattern (dots after the patterns), they become more versatile: Exp[a_. x^2 + b_. x^3 + c_.] -> Exp[c] f[a/b]. This will also work with eq1a = 5 Exp[x^2 + 4 x^3], for example. Also, d1_. Exp[d2_. SuperStar[α_] + d3_.] -> Exp[d3] f[d2] for the second one.
            $endgroup$
            – Roman
            May 9 at 12:29











          • $begingroup$
            @Roman, great point. Updated with default patterns.
            $endgroup$
            – kglr
            May 9 at 12:49










          • $begingroup$
            @Shadowray, thank you; I added the needed _.s.
            $endgroup$
            – kglr
            May 9 at 13:52







          2




          2




          $begingroup$
          If you use defaults in the replacement pattern (dots after the patterns), they become more versatile: Exp[a_. x^2 + b_. x^3 + c_.] -> Exp[c] f[a/b]. This will also work with eq1a = 5 Exp[x^2 + 4 x^3], for example. Also, d1_. Exp[d2_. SuperStar[α_] + d3_.] -> Exp[d3] f[d2] for the second one.
          $endgroup$
          – Roman
          May 9 at 12:29





          $begingroup$
          If you use defaults in the replacement pattern (dots after the patterns), they become more versatile: Exp[a_. x^2 + b_. x^3 + c_.] -> Exp[c] f[a/b]. This will also work with eq1a = 5 Exp[x^2 + 4 x^3], for example. Also, d1_. Exp[d2_. SuperStar[α_] + d3_.] -> Exp[d3] f[d2] for the second one.
          $endgroup$
          – Roman
          May 9 at 12:29













          $begingroup$
          @Roman, great point. Updated with default patterns.
          $endgroup$
          – kglr
          May 9 at 12:49




          $begingroup$
          @Roman, great point. Updated with default patterns.
          $endgroup$
          – kglr
          May 9 at 12:49












          $begingroup$
          @Shadowray, thank you; I added the needed _.s.
          $endgroup$
          – kglr
          May 9 at 13:52




          $begingroup$
          @Shadowray, thank you; I added the needed _.s.
          $endgroup$
          – kglr
          May 9 at 13:52

















          draft saved

          draft discarded
















































          Thanks for contributing an answer to Mathematica Stack Exchange!


          • Please be sure to answer the question. Provide details and share your research!

          But avoid


          • Asking for help, clarification, or responding to other answers.

          • Making statements based on opinion; back them up with references or personal experience.

          Use MathJax to format equations. MathJax reference.


          To learn more, see our tips on writing great answers.




          draft saved


          draft discarded














          StackExchange.ready(
          function ()
          StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fmathematica.stackexchange.com%2fquestions%2f197999%2freplacement-using-pattern-matching%23new-answer', 'question_page');

          );

          Post as a guest















          Required, but never shown





















































          Required, but never shown














          Required, but never shown












          Required, but never shown







          Required, but never shown

































          Required, but never shown














          Required, but never shown












          Required, but never shown







          Required, but never shown







          FYG,E,Yi2C,glwDCsLW9p71deRxm1KBNZj,W5Ft35aDG,T,Yt4bgnz3r NilK828Zy5BQ0sX pdnZYm8w7GB7L5EsZi P9v0Hhwk,Dx50DCUn
          c,BoBVSx5XHhMw173lG

          Popular posts from this blog

          RemoteApp sporadic failureWindows 2008 RemoteAPP client disconnects within a matter of minutesWhat is the minimum version of RDP supported by Server 2012 RDS?How to configure a Remoteapp server to increase stabilityMicrosoft RemoteApp Active SessionRDWeb TS connection broken for some users post RemoteApp certificate changeRemote Desktop Licensing, RemoteAPPRDS 2012 R2 some users are not able to logon after changed date and time on Connection BrokersWhat happens during Remote Desktop logon, and is there any logging?After installing RDS on WinServer 2016 I still can only connect with two users?RD Connection via RDGW to Session host is not connecting

          Vilaño, A Laracha Índice Patrimonio | Lugares e parroquias | Véxase tamén | Menú de navegación43°14′52″N 8°36′03″O / 43.24775, -8.60070

          Cegueira Índice Epidemioloxía | Deficiencia visual | Tipos de cegueira | Principais causas de cegueira | Tratamento | Técnicas de adaptación e axudas | Vida dos cegos | Primeiros auxilios | Crenzas respecto das persoas cegas | Crenzas das persoas cegas | O neno deficiente visual | Aspectos psicolóxicos da cegueira | Notas | Véxase tamén | Menú de navegación54.054.154.436928256blindnessDicionario da Real Academia GalegaPortal das Palabras"International Standards: Visual Standards — Aspects and Ranges of Vision Loss with Emphasis on Population Surveys.""Visual impairment and blindness""Presentan un plan para previr a cegueira"o orixinalACCDV Associació Catalana de Cecs i Disminuïts Visuals - PMFTrachoma"Effect of gene therapy on visual function in Leber's congenital amaurosis"1844137110.1056/NEJMoa0802268Cans guía - os mellores amigos dos cegosArquivadoEscola de cans guía para cegos en Mortágua, PortugalArquivado"Tecnología para ciegos y deficientes visuales. Recopilación de recursos gratuitos en la Red""Colorino""‘COL.diesis’, escuchar los sonidos del color""COL.diesis: Transforming Colour into Melody and Implementing the Result in a Colour Sensor Device"o orixinal"Sistema de desarrollo de sinestesia color-sonido para invidentes utilizando un protocolo de audio""Enseñanza táctil - geometría y color. Juegos didácticos para niños ciegos y videntes""Sistema Constanz"L'ocupació laboral dels cecs a l'Estat espanyol està pràcticament equiparada a la de les persones amb visió, entrevista amb Pedro ZuritaONCE (Organización Nacional de Cegos de España)Prevención da cegueiraDescrición de deficiencias visuais (Disc@pnet)Braillín, un boneco atractivo para calquera neno, con ou sen discapacidade, que permite familiarizarse co sistema de escritura e lectura brailleAxudas Técnicas36838ID00897494007150-90057129528256DOID:1432HP:0000618D001766C10.597.751.941.162C97109C0155020