R: Matematika Dasar - Revision history

Onnowpurbo: /* Spesial */

2019-11-28T05:21:24Z

Spesial

← Older revision		Revision as of 05:21, 28 November 2019
Line 104:		Line 104:
	prod(10:(10-4+1)) # permutations of 10 p 4		prod(10:(10-4+1)) # permutations of 10 p 4
	prod(100:(100-10+1)) #permutations of 100 p 10		prod(100:(100-10+1)) #permutations of 100 p 10


			==is, as, is.na, etc==

			is(5); is.numeric(5)
			my_undefined_function <- function(n){}
			is.function(my_undefined_function)
			is.logical(T) # T or F can be used as abb of TRUE or FALSE
			is(pi)

	==Pranala Menarik==		==Pranala Menarik==

	* [[R]]		* [[R]]

2019-11-28T02:46:07Z

Spesial

2019-11-28T02:44:55Z

Spesial

2019-11-28T02:43:53Z

Spesial

← Older revision		Revision as of 02:43, 28 November 2019
Line 92:		Line 92:


	stirling <- function(n) {sqrt(2pi)n ̂ {n+.5}*exp(-n)}		stirling <- function(n) {sqrt(2pi)n^{n+.5}*exp(-n)}
	stirling(100)		stirling(100)
	factorial(100)/stirling(100)		factorial(100)/stirling(100)



	==Pranala Menarik==		==Pranala Menarik==

	* [[R]]		* [[R]]

2019-11-28T02:43:16Z

← Older revision		Revision as of 02:43, 28 November 2019
Line 90:		Line 90:
	lfactorial(3000) #lfactorial helps out		lfactorial(3000) #lfactorial helps out
	sum(log(3000:2))		sum(log(3000:2))


			stirling <- function(n) {sqrt(2pi)n ̂ {n+.5}*exp(-n)}
			stirling(100)
			factorial(100)/stirling(100)



	==Pranala Menarik==		==Pranala Menarik==

	* [[R]]		* [[R]]

2019-11-28T02:41:51Z

Spesial

← Older revision		Revision as of 02:41, 28 November 2019
Line 89:		Line 89:
	factorial(3000) # any guess?		factorial(3000) # any guess?
	lfactorial(3000) #lfactorial helps out		lfactorial(3000) #lfactorial helps out
			sum(log(3000:2))


	==Pranala Menarik==		==Pranala Menarik==

	* [[R]]		* [[R]]

2019-11-28T02:41:06Z

← Older revision		Revision as of 02:41, 28 November 2019
Line 2:		Line 2:

	2 ^ 2		2 ^ 2

	2 * 2		2 * 2

	2 / 2		2 / 2

	2 + 2		2 + 2

	2 - 2		2 - 2

	4 * 3 ^ 3		4 * 3 ^ 3

Line 26:		Line 21:

	(-4:3) %% 2		(-4:3) %% 2

	(-4:3) %/% 3		(-4:3) %/% 3

Line 43:		Line 37:

	floor(0.39)		floor(0.39)
			ceiling(0.39)


			==Trigonometry==

	~~ceiling~~(~~0.39~~)		sin(pi/2)
			tan(pi/4)
			cos(pi)


Line 90:		Line 90:
	lfactorial(3000) #lfactorial helps out		lfactorial(3000) #lfactorial helps out

	~~==Trigonometry==~~

	~~sin(pi/2)~~
	~~tan(pi/4)~~
	~~cos(pi)~~

	==Pranala Menarik==		==Pranala Menarik==

	* [[R]]		* [[R]]

2019-11-28T02:40:22Z

Trigonometry

2019-11-28T02:40:12Z

Complex

← Older revision		Revision as of 02:40, 28 November 2019
Line 82:		Line 82:
	plot(t,chpois,"l") # Warning omitted and left as exercise		plot(t,chpois,"l") # Warning omitted and left as exercise
	# for the reader to interpret		# for the reader to interpret


			==Spesial==

			factorial(3)
			factorial(3000) # any guess?
			lfactorial(3000) #lfactorial helps out

	==Trigonometry==		==Trigonometry==

2019-11-28T02:38:39Z

Complex

← Older revision		Revision as of 02:38, 28 November 2019
Line 72:		Line 72:
	mu <- 0; sigma <- 1		mu <- 0; sigma <- 1
	t <- seq(-5,5,0.1)		t <- seq(-5,5,0.1)
	chsnv <- exp(1itmu-.5(sigma ̂ 2)(t ̂ 2))		chsnv <- exp(1itmu-.5(sigma^2)(t^2))
	plot(t,chsnv,"l",ylab=(expression(varphi(t))),main="Characteristic Function of Standard Normal Distribution")		plot(t,chsnv,"l",ylab=(expression(varphi(t))),main="Characteristic Function of Standard Normal Distribution")