Update comments for clarity in RcppTskit_intro.qmd

Author: bryo-han

RcppTskit/vignettes/RcppTskit_intro.qmd

@@ -325,8 +325,8 @@ ts <- ts_load(ts_file)
 # (on the pointer)
 ts_num_individuals2(ts$pointer)
 
-# An identical RcppTskit implementation
-# (available as the method of the TreeSequence class)
+# The above is identical to the RcppTskit implementation
+# (available as a method of the TreeSequence class)
 ts$num_individuals()
 ```