# Tag Info

12

Here is a method to generate the ticks automatically based on the plot range. It uses FindDivisions to select "pleasing" values. eVticks = {1240/#, NumberForm[N@#, {2, 1}]} & /@ FindDivisions[1240/{##}, 8] &; ListPlot[{{500, 50}}, Frame -> True, PlotRange -> {{400, 800}, {-10, 110}}, FrameLabel -> {"Wavelength (nm)", "Intensity (a.u.)...

9

If I understand you correctly, is the following what you want? correlations2 = Map[ Outer[Correlation, #, #, 1] &[Transpose[#]] &, partitionedData, {2}]; Now the Correlation receives two vector as its input, and you can replace it with SpearmanRankCorrelation or KendallRankCorrelation legally. To verify it, compare correlations2 with your ...

8

I faced this same problem. I tried all of the answers mentioned but none of them worked. Finally figured it out.This is what I did: Firstly after you download the LevelScheme zip file extract it anywhere. In my case(Ubuntu) I extracted it at Desktop.So this is the folder contents after extraction: Then you run this to find your Basedirectory ...

7

As soon as I posted, I realized I could check whether there were any options for LinTicks that might be useful: Options@LinTicks // TableForm Scanning that list, I saw: TickLabelFunction -> Automatic On a hunch, I added TickLabelFunction -> TraditionalForm To the ticks definition from the question, and things worked:

6

I would define my upper ticks so that it should be easy to change the number of decimal points if needed (thanks to Mr.Wizard for pointing out a mistake). upperTicks = Module[{labels, positions}, labels = Range[1240/400, 1240/800, -0.2]; positions = 1240/# & /@ labels; Transpose[{positions, labels}]]; upperTicksMinor = Module[{labels, positions, ...

5

Let me make a guess: When you append "/Users/alessandromanzotti/Downloads/LevelScheme" to your $Path, then it is not possible to load LevelScheme because no sub-directory contains a package named LevelScheme. Please try the following: Copy the whole LevelScheme directory to "/Users/alessandromanzotti/Library/Mathematica/Applications" so that you have a ... 4 The reason the OP's hack works is because Inset allows to place non-graphic objects in a graphics object. The reason it does not work is because Inset places the inset in the center of hosting graph by default. The package has a command to include non-graphics objects: ScaledLabel. The following function takes a legend plot pand returns the command to ... 4 I think the "easiest" way is to abandon the use of LevelScheme to position your legend. Instead, I would do something like this, legend = myplot /. Legended[_, Placed[l_, ___]|{Placed[l_, ___]}] :> l; Legended[ Figure[ (* fill in details *), Placed[ legend, placement ] ] 4 You appear to have an inefficiency in your algorithm. You generate a symmetrical correlation matrix and only use one element (correlations[[All, All, 1, 2]]). You also partition everything before processing which takes a lot of memory: ByteCount[partitionedData] 505899832 I suggest reformulating your code to produce only the significant correlation ... 3 Appending to the$Path is not a good idea, because it doesn't change $Path permanently. You would have to evaluate the Append expression in new session where you planned to use the package. Best to move the package to a standard folder already on$Path. An appropriate folder would be found by evaluating FileNameJoin[{$UserBaseDirectory, "Applications"}] 2 Here's an example of how to do it with the SciDraw package, which is the successor of LevelScheme (you'll be able to re-use some of what you've learned about LevelScheme). I'm not experienced with the original LevelScheme so I won't attempt to use it now or comment on its capabilities. Needs["SciDraw"] Figure[ FigurePanel[ { FigLine@Plot[Sin[x], {x,... 2 I would approach your problem, firstly by dropping all legends from your plots. As an example, your density plot would be redefined as myDensity = DensityPlot[Sin[x], {x, 0, 10}, {y, -1, 1}]; and I would define a bar legend using another density plot: lgDensity = DensityPlot[y, {x, 0, 1}, {y, -1, 1}, ColorFunction -> ColorData["LakeColors"] ]... 1 This should work. Step 1) Run the command below to find your Base directory FileNameJoin[{$UserBaseDirectory, "Applications"}] In my case it was "C:\\Users\\Username\\AppData\\Roaming\\Mathematica\\Applications" Step 2) Copy all the folders inside the LevelScheme folder (this is crucial do not copy the main folder, only its contents are to copied) ...

1

You should prepend to the code of your question << "LevelScheme"` However, this doesn't open with my version of MMA (10.0) As an alternative one could use a = ListPlot[Table[{.1 x, Sinc[.1 x]}, {x, Range@200}], Frame -> True, PlotRange -> {{0, 10}, {0, 1}}, Joined -> False, AspectRatio -> 1.5, PlotLegends -> Placed[{"(a)"}...

Only top voted, non community-wiki answers of a minimum length are eligible