ประชากรต้นแบบ — เปลี่ยนขนาดตัวอย่าง

set.seed(4747)

# Generate 100 random samples of size 50
many_samples <- ___

# Using many_samples, plot response vs. explanatory, grouped by replicate
___ + 
  # Add a point layer
  ___ + 
  # Add a smooth  trend layer, using lin. reg., no ribbon 
  ___