Tag Info

Hot answers tagged

6

Here is a function that copies a Unicode string to the clipboard using JLink: Needs["JLink`"]; InstallJava[]; LoadJavaClass["java.awt.Toolkit", AllowShortContext -> False]; uniclip[s_String] := JavaBlock[ java`awt`Toolkit`getDefaultToolkit[]@getSystemClipboard[]@setContents[#, #]& @ JavaNew["java.awt.datatransfer.StringSelection", s] ...


6

Here's how to add a permanent menu item and keyboard shortcut for Silvia's solution. (This can be easily adapted to Jens' solution for Mac OS.) 1. Add Package Copy Silvia's first code block that starts with Needs["NETLink`"] to a file and save it as UniCodeCopy.m in one of the directories included in $Path. 2. Initialize the Front End Save the ...


4

I think this is the problem you are talking about (screen shot from Word): In Mathematica 9, the line thickness was less so it looked like this: One thing you could try is to set the line thickness explicitly in Mathematica 10: Plot[Sin[x], {x, 0, 10}, PlotStyle -> AbsoluteThickness[0]] Then, it will look like this in Word: Which is closer to ...


1

try this: CopyFile[First@FileNames[ "E:\\work\\META分析\\source\\GSE28160_RAW1\\" ~~ cases[[1]] ~~"*.CEL"], "E:\\work\\1.CEL"] CopyFile on is own does not do filesystem globbing and so the way you have it its looking for a file that literally has a "*" in its name.


1

Something like... Export["C:\\Temp\\Out.txt",StringJoin[Riffle[Map[ToString[Out[#]]&,{1,2,3}],";"]]] I'd suggest you look up each of Export, StringJoin, Riffle, Map, ToString etc to work out what does what.



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