Dağılım grafiğini canlandır

Question

Aşağıdaki formatta bir veri setim var

{time,x_pos,y_pos,z_pos}

3B liste noktası grafiğinde zaman içindeki koordinat {x, y, z} değişikliklerini gösteren bir animasyon yapmak istiyorum. Biri bana bir fikir verebilir mi lütfen? Son animasyon aşağıdaki gibi görünmelidir. Gösterge (yeşil daire) zamanla hareket ediyor (şeklin üzerinde gösterilmiştir). Verileri paylaşamadığım için üzgünüm. Teşekkür ederim!

Answer 1

SeedRandom[1]
dates = Sort @ RandomSample[DateRange[Today, DatePlus[Today, {100, "Day"}]], 30];
data = Join[List /@ dates, Accumulate[RandomReal[10, {30, 3}]], 2];

g1 = Graphics3D[{Blue, Line@data[[All, 2 ;;]]}, BoxRatios -> 1, Axes -> Automatic];

frames = Table[Show[g1, Graphics3D[{Red, Sphere[data[[i, 2 ;;]], 5]}], 
    PlotLabel -> data[[i, 1]], SphericalRegion -> True, 
    ImageSize -> Medium, ImagePadding -> 20, 
    PlotRange -> {{0, 200}, {0, 200}, {0, 200}}], 
  {i, 1, Length @ data}];

ListAnimate[frames]