Skip to main content

Syntax error: newline character interpreted as multiplication


I'm getting this error in Wolfram Workbench, and I don't know where it comes from: "Syntax error: newline character interpreted as multiplication"


This error happens around an If[] function, in a custom function, defined as


myFunction[x_,y_] :=

Module[{variable},


(* some code *)
variable = 1
If[x==2,x=3,x=4]

(* some code *)

]

No matter where I try to put my If[] function inside myFunction[], I get this error, but I don't get it if I put it outside myFunction[].



Maybe the problem comes from the Module[] function, as when I take it out the error disappears.


Any idea what's going on?



Answer



This is a very common error, and one I am guilty of making more often than I care to admit. The difficulty lies in how Mathematica determines where one expression ends and another begins, and how this interpretation seems to change within a construct like Module, Block, For, etc. In the following, I will primarily discuss how this applies to the front-end, but the conclusions are valid for WorkBench, too.


Consider the following examples:


p = 5; q = 6
DownValues[In]
(* { ...
HoldPattern[In[7]] :> (p = 5; q = 6)
...}

*)

and


(r = 5;
s = 6)
DownValues[In]
(* { ...
HoldPattern[In[17]] :> (r = 5; s = 6)
...}
*)


versus


c = 5;
d = 6
DownValues[In]
(* { ...
HoldPattern[In[4]] :> (c = 5;), HoldPattern[In[5]] :> (d = 6)
...}
*)


where I used the DownValues of In to show how Mathematica interprets the input lines. The first two examples are interpreted in exactly the same way as a single input line of code, but the third example produces two input lines. The key difference is that in the second example the carriage return is no longer interpreted as an input line delimiter because it is within an expression. Of course, this does not mean that


a
b

is interpreted as Times[a, b] as there is no obvious way to interpret the two as connected. Within parentheses or as a function parameter, the interpretation of the carriage-return as a input line delimiter is suspended, and it is treated as multiplication along with the rest of the whitespace characters.


The change in behavior from an input line delimiter to an implicit multiplication has an interesting consequence, the following generates an error


(l = 5
m = 6)
DownValues[In]
(*

Set::write: "Tag Times in 5 m is Protected."
{ ...
HoldPattern[In[14]] :> (l = 5 m = 6)
...}
*)

Looking at the FullForm of Hold[(l = 5 m = 6)] reveals


FullForm[Hold[(l = 5 m = 6)]]
(*
Hold[Set[l, Set[Times[5, m], 6]]]

*)

telling us that we were trying to assign a value to Times. So, inside parentheses or as a function parameter, a semi-colon must be used to indicate that it is a compound expression.


Comments

Popular posts from this blog

plotting - Plot 4D data with color as 4th dimension

I have a list of 4D data (x position, y position, amplitude, wavelength). I want to plot x, y, and amplitude on a 3D plot and have the color of the points correspond to the wavelength. I have seen many examples using functions to define color but my wavelength cannot be expressed by an analytic function. Is there a simple way to do this? Answer Here a another possible way to visualize 4D data: data = Flatten[Table[{x, y, x^2 + y^2, Sin[x - y]}, {x, -Pi, Pi,Pi/10}, {y,-Pi,Pi, Pi/10}], 1]; You can use the function Point along with VertexColors . Now the points are places using the first three elements and the color is determined by the fourth. In this case I used Hue, but you can use whatever you prefer. Graphics3D[ Point[data[[All, 1 ;; 3]], VertexColors -> Hue /@ data[[All, 4]]], Axes -> True, BoxRatios -> {1, 1, 1/GoldenRatio}]

plotting - Filling between two spheres in SphericalPlot3D

Manipulate[ SphericalPlot3D[{1, 2 - n}, {θ, 0, Pi}, {ϕ, 0, 1.5 Pi}, Mesh -> None, PlotPoints -> 15, PlotRange -> {-2.2, 2.2}], {n, 0, 1}] I cant' seem to be able to make a filling between two spheres. I've already tried the obvious Filling -> {1 -> {2}} but Mathematica doesn't seem to like that option. Is there any easy way around this or ... Answer There is no built-in filling in SphericalPlot3D . One option is to use ParametricPlot3D to draw the surfaces between the two shells: Manipulate[ Show[SphericalPlot3D[{1, 2 - n}, {θ, 0, Pi}, {ϕ, 0, 1.5 Pi}, PlotPoints -> 15, PlotRange -> {-2.2, 2.2}], ParametricPlot3D[{ r {Sin[t] Cos[1.5 Pi], Sin[t] Sin[1.5 Pi], Cos[t]}, r {Sin[t] Cos[0 Pi], Sin[t] Sin[0 Pi], Cos[t]}}, {r, 1, 2 - n}, {t, 0, Pi}, PlotStyle -> Yellow, Mesh -> {2, 15}]], {n, 0, 1}]

plotting - Mathematica: 3D plot based on combined 2D graphs

I have several sigmoidal fits to 3 different datasets, with mean fit predictions plus the 95% confidence limits (not symmetrical around the mean) and the actual data. I would now like to show these different 2D plots projected in 3D as in but then using proper perspective. In the link here they give some solutions to combine the plots using isometric perspective, but I would like to use proper 3 point perspective. Any thoughts? Also any way to show the mean points per time point for each series plus or minus the standard error on the mean would be cool too, either using points+vertical bars, or using spheres plus tubes. Below are some test data and the fit function I am using. Note that I am working on a logit(proportion) scale and that the final vertical scale is Log10(percentage). (* some test data *) data = Table[Null, {i, 4}]; data[[1]] = {{1, -5.8}, {2, -5.4}, {3, -0.8}, {4, -0.2}, {5, 4.6}, {1, -6.4}, {2, -5.6}, {3, -0.7}, {4, 0.04}, {5, 1.0}, {1, -6.8}, {2, -4.7}, {3, -1....