mirror of
				https://asciireactor.com/otho/as-500.git
				synced 2025-10-31 18:38:06 +00:00 
			
		
		
		
	
		
			
				
	
	
		
			47 lines
		
	
	
		
			2.4 KiB
		
	
	
	
		
			R
		
	
	
	
	
	
			
		
		
	
	
			47 lines
		
	
	
		
			2.4 KiB
		
	
	
	
		
			R
		
	
	
	
	
	
| curve()
 | |
| curve(
 | |
| ?curve
 | |
| curve(0.00308105*exp(-4241.3*x),xlim=c(5000,50000),xlab="Temperature (K)",ylab="Line Ratio (n.u.)")
 | |
| curve(0.00308105*exp(-4241.3*x),xlim=c(5000,50000),xlab="Temperature (K)",ylab="Line Ratio (n.u.)",ylim=c(0,0.004))
 | |
| curve(0.00308105*exp(-4241.3*x)*x,xlim=c(5000,50000),xlab="Temperature (K)",ylab="Line Ratio (n.u.)",ylim=c(0,0.004))
 | |
| curve(0.00308105*exp(-4241.3*x)*x,xlim=c(5000,50000),xlab="Temperature (K)",ylab="Line Ratio (n.u.)",ylim=c(0,0.0004))
 | |
| curve(0.00308105*exp(-4241.3*x)*x,xlim=c(5000,50000),xlab="Temperature (K)",ylab="Line Ratio (n.u.)",ylim=c(0,0.000004))
 | |
| curve(0.00308105*exp(-4241.3*x)*x,xlim=c(5000,50000),xlab="Temperature (K)",ylab="Line Ratio (n.u.)",ylim=c(0,0.0000000004))
 | |
| q
 | |
| curve(0.00308105*exp(-4241.3/x),xlim=c(5000,50000))
 | |
| curve(0.00308105*exp(-4241.3/x),xlim=c(5000,50000),xlab="Temperature (K)",ylab="Line Ratio (n.u.)"))
 | |
| curve(0.00308105*exp(-4241.3/x),xlim=c(5000,50000),xlab="Temperature (K)",ylab="Line Ratio (n.u.)"))
 | |
| curve(0.00308105*exp(-4241.3/x),xlim=c(5000,50000),xlab="Temperature (K)",ylab="Line Ratio (n.u.)")
 | |
| curve(0.00308105*exp(-4241.3/x),xlim=c(5000,50000),xlab="Temperature (K)",ylab="Line Ratio (n.u.)",log="x")
 | |
| curve(0.00308105*exp(-4241.3/x),xlim=c(5000,50000),xlab="Temperature (K)",ylab="Line Ratio (n.u.)",log="y")
 | |
| pdf("lineratio.pdf")
 | |
| curve(0.00308105*exp(-4241.3/x),xlim=c(5000,50000),xlab="Temperature (K)",ylab="Line Ratio (n.u.)",log="y")
 | |
| dev.off()
 | |
| ln(0.0048/0.00308105)/-4241.3
 | |
| log(0.0048/0.00308105)/-4241.3
 | |
| log10(0.0048/0.00308105)/-4241.3
 | |
| ?log
 | |
| log(0.0048/0.00308105)/-4241.3
 | |
| quit()
 | |
| pdf("lineratio.pdf")
 | |
| curve(0.00308105*exp(-4241.3/x),xlim=c(5000,50000),xlab="Temperature (K)",ylab="Line Ratio (n.u.)",log="y")
 | |
| pdf("lineratio.pdf")
 | |
| dev.off()
 | |
| curve(0.00308105*exp(-4241.3/x),xlim=c(5000,50000),xlab="Temperature (K)",ylab="Line Ratio (n.u.)",log="y")
 | |
| dev.off()
 | |
| pdf("lineratio.pdf")
 | |
| curve(0.0040569*exp(-4241.3/x),xlim=c(5000,50000),xlab="Temperature (K)",ylab="Line Ratio (n.u.)",log="y")
 | |
| dev.off()
 | |
| exit()
 | |
| exit
 | |
| quit()
 | |
| curve(36.070*exp(-32976/x),xlim=c(5000,50000),xlab="Temperature (K)",ylab="Line Ratio (n.u.)",log="y")
 | |
| pdf("lineratio.pdf")
 | |
| curve(36.070*exp(-32976/x),xlim=c(5000,50000),xlab="Temperature (K)",ylab="Line Ratio (n.u.)",log="y")
 | |
| dev.off()
 | |
| curve(36.070*exp(-32976/x),xlim=c(5000,50000),xlab="Temperature (K)",ylab="I[4262A]/I[5007A] (n.u.)",log="y")
 | |
| pdf("lineratio.pdf")
 | |
| curve(36.070*exp(-32976/x),xlim=c(5000,50000),xlab="Temperature (K)",ylab="I[4262A]/I[5007A] (n.u.)",log="y")
 | |
| dev.off()
 | |
| quit()
 |