inst/QA3D/server/versions.r

output$version_numbers <- renderUI({
	HTML(
		paste(
			"<strong>QA3D:  </strong>", gsub("'", "" , packageVersion("QA3D")),"<p></p>",
			"<strong>R: </strong>", gsub('R version', '', gsub('version.string R ', '', version['version.string'])),"<p></p><br><br><br>",
		sep = "")
	)
})
jjlynch2/QA3D documentation built on March 31, 2022, 5:42 p.m.