Can someone confirm this on 10.3? What do you see when you evaluate

Manipulate[
 f[u],
 {u, {x -> "X-Label", y -> "Y-Label"}}
 ]

This is the proper way to use a setter bar with labels, but for me, after evaluating I see f[x->"X-Label"]

@halirutan Same. Until I start clicking on the buttons. Then I just see f[x] or f[y].

@MichaelHale Yep. Exactly what I see.

Shit.. I need labels to cover the x expression

Manually specifying initial value works though.

Manipulate[f[u], {{u, x}, {x -> "X-Label", y -> "Y-Label"}}]

@MichaelHale yes, I know.

@MichaelHale I'm pretty sure I saw a similar issue once.

:25701440

@halirutan @halirutan

@Karsten7. I've moved our conversation to main

@Sosi it seems DensityHistogram Color Function can only take Heigth argument

but since t is not really about Density Histogram:

recA = .25
{colorFun @@ #, Rectangle[# - recA/2, # + recA/2]} & /@
    Union@Round[#, recA] &@pos // Graphics

(@Kuba, should I ask a question with this? You can then get some more points for an answer)

@Sosi I don't know, it seems to be to narrow, but maybe you can ask it in more general manner. I don't know :)

@Sosi is my code working for you?

recA is some kind of resolution parameter

almost

it's giving some error

"blend is not a graphics primitive or directive"

@Sosi here's whole code:

n = 5000;
pos = RandomVariate[NormalDistribution[0, 2], {n, 2}];
altitude = Norm /@ pos;
colorFun =
  Function[{x, y},
   Blend[{{Min[altitude], Yellow}, {Max[altitude], Red}},
    Norm[{x, y}]]];

recA = .25
{colorFun @@ #, Rectangle[# - recA/2, # + recA/2]} & /@
    Union@Round[#, recA] &@pos // Graphics

ah this one works

Ok, get to go, good luck

yeah, I think this would be cool for my purposes!

:D

Does anyone have tips for how I can approximate the period of a limit cycle as precisely as possible? Currently I'm choosing a spot in the vector field, integrating for a while so that I approach the orbit/limit cycle, and then use WhenEvent like this:

{{xpos, ypos}} = {x, y} /. NDSolve[{
     x'[t] == y[t],
     y'[t] == -1.5 (x[t]^2 - 1) y[t] - x[t],
     x[0] == 0.5,
     y[0] == 0
     }, {x, y}, {t, 0, 100}];

{{xpos, ypos}} = {x, y} /. NDSolve[{
    x'[t] == y[t],
    y'[t] == -1.5 (x[t]^2 - 1) y[t] - x[t],
    x[0] == xpos[100],
    y[0] == ypos[100],
    WhenEvent[
     Norm[{x[t], y[t]} - {xpos[100], ypos[100]}] < 0.1,
     "StopIntegration"
     ]
    }, {x, y}, {t, 0, 100}]

(* The above integration stopped at 7.06; example visualization: *)

I don't like my Norm[{x[t], y[t]} - {xpos[100], ypos[100]}] < 0.1, the choice of 0.1 is not good enough and if I make it smaller then it won't work. I also tried ArcTan but I have precision problems with that as well.