New answers tagged

2

Suppose your F contains indexed variables x[0], x[1], .... You just need to make replacement rules: xList = RandomReal[10, 10]; rules = Thread[Array[x, 10, 0] -> xList] {x[0] -> 7.30088, x[1] -> 6.64534, x[2] -> 0.195005, x[3] -> 0.750164, x[4] -> 1.75732, x[5] -> 8.85201, x[6] -> 2.86472, x[7] -> 6.51873, x[8] -> 2....


0

Is there something you need listed below? g = # - # Log[# + Sqrt@#] &; f[x_List,] := c + Total[g /@ x] f@{1, 2, 3, 4, 5} g = # - # Log[# + Sqrt@#] &; f = c + Total[g /@ Table[x[i], {i, 5}]]; With[{x = {1, 2, 3, 4, 5}[[#]] &}, f]


5

Since the output of VoronoiMesh is a MeshRegion, use MeshRegion to change options. An example mesh: SeedRandom[1] mesh = VoronoiMesh[RandomReal[1, {5, 2}]] Using MeshRegion to change options: MeshRegion[mesh, ImageSize -> Medium, Epilog -> Inset[ Framed[Column[{BarLegend["Rainbow"]},Alignment->Center],Background->White], ...


Top 50 recent answers are included