CodeWriter

AI code generation without the chatter

Chat Example

Create a table listing the first 9 layers of Pascal's triangle.

Table[Binomial[n,k],{n,0,8},{k,0,n}]

I need a round button that toggles between green and red when clicked. It needs to be surrounded by a static black box.

DynamicModule[{color=Red},Column[{Framed[EventHandler[Graphics[{Dynamic@color,Disk[]},ImageSize->50],"MouseClicked":>(color=If[color===Green,Red,Green])],Background->Black,FrameMargins->10]}]]

Create a rainbow infinite symbol.

ParametricPlot[{Sin[t],Sin[t](2+Cos[t])/2},{t,0,2Pi},PlotStyle->Thickness[0.02],Axes->False,Frame->False,ColorFunction->Function[{x,y,t},ColorData["Rainbow"][t]]]

Programmatic Access

Retrieve the prompt:
LLMPrompt["CodeWriter"]

Examples

Open in Cloud
Download Notebook

Generate code programmatically:

In[1]:=

LLMSynthesize[{LLMPrompt["CodeWriter"],"Simulate a random walk"}]

Out[1]=

RandomWalk[n_] := Accumulate[Join[{0}, RandomVariate[NormalDistribution[0, 1], n]]]ListLinePlot[RandomWalk[500], PlotRange -> All]

Neat Examples
(1)

Code from the chat notebook above:

In[1]:=

Table[Binomial[n-1,k-1],{n,1,9},{k,1,n}]

Out[1]=

{{1},{1,1},{1,2,1},{1,3,3,1},{1,4,6,4,1},{1,5,10,10,5,1},{1,6,15,20,15,6,1},{1,7,21,35,35,21,7,1},{1,8,28,56,70,56,28,8,1}}

In[2]:=

Button[DynamicModule[{color=Green},EventHandler[Framed[Graphics[{Dynamic[color],Disk[]},ImageSize50],FrameStyleBlack,BackgroundWhite],{"MouseClicked"(color=If[colorGreen,Red,Green])}]],ImageSize60]Initializationcode:state=False;

Out[2]=

In[3]:=

ParametricPlot[{Sin[t],Sin[2t]/2}+{1/4,0},{t,0,2Pi},PlotStyleThick,ColorFunctionFunction[{x,y,t},ColorData["Rainbow"][t/(2Pi)]],ColorFunctionScalingFalse,AxesFalse,PlotRangePaddingScaled[.06]]

Out[3]=

Prompt Source

Definition Notebook »

Publisher Information

Contributed by: Wolfram Staff