Skip to main content
Mathematica

Return to Answer

added 1 character in body
Source Link
kglr
kglr
  • 400.5k
  • 18
  • 488
  • 929
asso1 = Association[parameterNamesThreadedThroughNumericList];
asso2 = Association[alternativeParameterLists];

Normal@Merge[{asso1parameterNamesThreadedThroughNumericList, asso2alternativeParameterLists}, 
 Times @@ # &]

or

Normal@Merge[TimesNormal@Merge[Times@@#&][{parameterNamesThreadedThroughNumericList, @@ 
 # &][{asso1,asso2 alternativeParameterLists}]

both give

{k1p -> 0.034859, k1m -> 86.3298, k2p -> 0.12406, k2m -> 79.7253, pfb -> 4.85107, k3p -> 0.016358, k3m -> 18.5253, k4p -> 4.53765, k4m -> 28.0271, k5p -> 1.17405, k5m -> 41.9122, k6p -> 9.86758, k6m -> 51.707, kn -> 1.06146, kc -> 0.02758, k8p -> 2.20933, k8m -> 82.1327, k9p -> 10.472, k9m -> 90.9819, nfbs -> 0.08481, nfbX -> 3.58059, state -> 0.}

asso1 = Association[parameterNamesThreadedThroughNumericList];
asso2 = Association[alternativeParameterLists];

Normal@Merge[{asso1, asso2}, Times @@ # &]

or

Normal@Merge[Times @@ # &][{asso1,asso2}]

both give

{k1p -> 0.034859, k1m -> 86.3298, k2p -> 0.12406, k2m -> 79.7253, pfb -> 4.85107, k3p -> 0.016358, k3m -> 18.5253, k4p -> 4.53765, k4m -> 28.0271, k5p -> 1.17405, k5m -> 41.9122, k6p -> 9.86758, k6m -> 51.707, kn -> 1.06146, kc -> 0.02758, k8p -> 2.20933, k8m -> 82.1327, k9p -> 10.472, k9m -> 90.9819, nfbs -> 0.08481, nfbX -> 3.58059, state -> 0.}

Normal@Merge[{parameterNamesThreadedThroughNumericList, alternativeParameterLists}, 
 Times @@ # &]

or

Normal@Merge[Times@@#&][{parameterNamesThreadedThroughNumericList,  
   alternativeParameterLists}]

both give

{k1p -> 0.034859, k1m -> 86.3298, k2p -> 0.12406, k2m -> 79.7253, pfb -> 4.85107, k3p -> 0.016358, k3m -> 18.5253, k4p -> 4.53765, k4m -> 28.0271, k5p -> 1.17405, k5m -> 41.9122, k6p -> 9.86758, k6m -> 51.707, kn -> 1.06146, kc -> 0.02758, k8p -> 2.20933, k8m -> 82.1327, k9p -> 10.472, k9m -> 90.9819, nfbs -> 0.08481, nfbX -> 3.58059, state -> 0.}

added 70 characters in body
Source Link
kglr
kglr
  • 400.5k
  • 18
  • 488
  • 929
asso1 = Association[parameterNamesThreadedThroughNumericList];
asso2 = Association[alternativeParameterLists]; 

Normal@Merge[{asso1, asso2}, Times @@ # &]

or

Normal@Merge[Times @@ # &][{asso1,asso2}]

both give

{k1p -> 0.034859, k1m -> 86.3298, k2p -> 0.12406, k2m -> 79.7253, pfb -> 4.85107, k3p -> 0.016358, k3m -> 18.5253, k4p -> 4.53765, k4m -> 28.0271, k5p -> 1.17405, k5m -> 41.9122, k6p -> 9.86758, k6m -> 51.707, kn -> 1.06146, kc -> 0.02758, k8p -> 2.20933, k8m -> 82.1327, k9p -> 10.472, k9m -> 90.9819, nfbs -> 0.08481, nfbX -> 3.58059, state -> 0.}

asso1 = Association[parameterNamesThreadedThroughNumericList];
asso2 = Association[alternativeParameterLists];
Normal@Merge[{asso1, asso2}, Times @@ # &]

{k1p -> 0.034859, k1m -> 86.3298, k2p -> 0.12406, k2m -> 79.7253, pfb -> 4.85107, k3p -> 0.016358, k3m -> 18.5253, k4p -> 4.53765, k4m -> 28.0271, k5p -> 1.17405, k5m -> 41.9122, k6p -> 9.86758, k6m -> 51.707, kn -> 1.06146, kc -> 0.02758, k8p -> 2.20933, k8m -> 82.1327, k9p -> 10.472, k9m -> 90.9819, nfbs -> 0.08481, nfbX -> 3.58059, state -> 0.}

asso1 = Association[parameterNamesThreadedThroughNumericList];
asso2 = Association[alternativeParameterLists]; 

Normal@Merge[{asso1, asso2}, Times @@ # &]

or

Normal@Merge[Times @@ # &][{asso1,asso2}]

both give

{k1p -> 0.034859, k1m -> 86.3298, k2p -> 0.12406, k2m -> 79.7253, pfb -> 4.85107, k3p -> 0.016358, k3m -> 18.5253, k4p -> 4.53765, k4m -> 28.0271, k5p -> 1.17405, k5m -> 41.9122, k6p -> 9.86758, k6m -> 51.707, kn -> 1.06146, kc -> 0.02758, k8p -> 2.20933, k8m -> 82.1327, k9p -> 10.472, k9m -> 90.9819, nfbs -> 0.08481, nfbX -> 3.58059, state -> 0.}

Source Link
kglr
kglr
  • 400.5k
  • 18
  • 488
  • 929

asso1 = Association[parameterNamesThreadedThroughNumericList];
asso2 = Association[alternativeParameterLists];
Normal@Merge[{asso1, asso2}, Times @@ # &]

{k1p -> 0.034859, k1m -> 86.3298, k2p -> 0.12406, k2m -> 79.7253, pfb -> 4.85107, k3p -> 0.016358, k3m -> 18.5253, k4p -> 4.53765, k4m -> 28.0271, k5p -> 1.17405, k5m -> 41.9122, k6p -> 9.86758, k6m -> 51.707, kn -> 1.06146, kc -> 0.02758, k8p -> 2.20933, k8m -> 82.1327, k9p -> 10.472, k9m -> 90.9819, nfbs -> 0.08481, nfbX -> 3.58059, state -> 0.}