--- /dev/null
+### A Pluto.jl notebook ###
+# v0.12.21
+
+using Markdown
+using InteractiveUtils
+
+# This Pluto notebook uses @bind for interactivity. When running this notebook outside of Pluto, the following 'mock version' of @bind gives bound variables a default value (instead of an error).
+macro bind(def, element)
+ quote
+ local el = $(esc(element))
+ global $(esc(def)) = Core.applicable(Base.get, el) ? Base.get(el) : missing
+ el
+ end
+end
+
+# ╔═╡ 3358d5e0-8e06-11eb-07d6-dd032cc37026
+begin
+ using LinearAlgebra, Statistics, Plots, PlutoUI, Images, FileIO
+ default(label = false, minorgrid = true)
+ gr()
+end
+
+# ╔═╡ 2d091510-8e06-11eb-024c-ad66088d8267
+html"<style>main { max-width: 100%; margin-right: 0; }</style>"
+
+# ╔═╡ 6f577550-8e07-11eb-3050-59d41656090a
+@bind reset Button("Reset to default values")
+
+# ╔═╡ dd277270-8e06-11eb-028d-6572609606a0
+let
+ reset
+ md"a: $(@bind a Slider(0:0.01:1; default = 0.5, show_value = true))"
+end
+
+# ╔═╡ 4911f142-8e07-11eb-22bd-8f4afc63d60b
+let
+ reset
+ md"b: $(@bind b Slider(0:0.01:1; default = 0.5, show_value = true))"
+end
+
+# ╔═╡ 3abb8d50-8e06-11eb-3403-99d035b3fefb
+let
+ xₜ(t) = 3*a*t*(1-t)^2 + 3*t^2*(1-t) + t^3
+ yₜ(t) = (3-3*b)*t^2 * (1-t) + t^3
+ plot(xₜ, yₜ, 0, 1, aspect_ratio = 1)
+end
+
+# ╔═╡ Cell order:
+# ╟─2d091510-8e06-11eb-024c-ad66088d8267
+# ╟─3358d5e0-8e06-11eb-07d6-dd032cc37026
+# ╟─dd277270-8e06-11eb-028d-6572609606a0
+# ╟─4911f142-8e07-11eb-22bd-8f4afc63d60b
+# ╟─6f577550-8e07-11eb-3050-59d41656090a
+# ╠═3abb8d50-8e06-11eb-3403-99d035b3fefb