Tuesday, April 10, 2007
Mathematica 매스매티카] 가분수를 대분수로 변환 함수; To Mixed Fraction
매스매티카 Mathematica 는, 대분수(帶分數; Mixed Fraction; Mixed Number; 혼분수)를 다룰 수가 없더군요. 대분수는 가분수의 형태를 취해야 했습니다.
컴퓨터 연산에서는 가분수(假分數; Improper Fraction)가 이상적이지만, 실생활에서는 대분수가 편리합니다.
설탕을 "1과 1/2 스푼" 넣으세요 라는 문장을
설탕을 "3/2 스푼" 넣으세요 라고, 즉 "2분의 3" 스푼으로 바꾸면, 쉽게 이해하기 힘들게 됩니다.
그리고
후추를 "5와 1/3 스푼" 넣으세요 라는 문장은 쉽지만
후추를 "16/3 스푼" 넣으세요 즉, "3분의 16 스푼" 이라는 문장은 알기 어렵습니다.
(1) "분자 나누기 분모"를 구하면
(2) "몫"은 정수부, "나머지"는 진분수의 분자가 됨
(3) 분모는 변경되지 않음.
(4) 약분 가능하면 약분해야 함
예제:
"16/3" (3분의 16) 이라는 가분수를 대분수로 고치려면
♣ 16 나누기 3 을 합니다.
3 x 5 = 15 이기에, 이 경우, 몫은 5 이고, 나머지는 1 입니다.
♣ 5와 1/3 이라는 대분수로 고쳐집니다. (소수로는 5.333333 이라는 값을 가짐)
혹시 이런 기능의 함수가 내장되어 있는지 찾아보아도 없어서, 다음과 같은 함수를 만들어 보았습니다. 매스매티카는 내장 함수가 아닌 경우, 함수명이 소문자로 시작해야 합니다.
옆으로스크롤가능
(매스매티카의 특성상, 앞에서 말한 변환 공식과는 조금 다릅니다. 변환 공식대로 함수를 만들면 좀 길이가 길어져서...)
이제 위의 함수 정의를 복사하여, 매스매티카 노트북(하얀 빈 종이)에 붙여 넣고 Shift+Enter키를 눌러 입력합니다.
그런 후
mixedFraction[3/2]
이라고 하면 "2분의 3"이라는 가분수가 "1 + 2분의 1"이라는 대분수로 변환됩니다. 모호함을 피하기 위해 정수부와 진분수 사이에 플러스 기호를 넣어 주었습니다.
텍스트 모드 매스매티카에서의 실행 결과 화면:
▶▶ Mathematica 매스매티카] 대분수를 가분수로 바꾸기, 입력 방법; To Improper Fraction
대분수 가분수 변환기 (웹브라우저에서): ▶▶ 대분수 가분수 변환 계산기; Mixed Number Calc
컴퓨터 연산에서는 가분수(假分數; Improper Fraction)가 이상적이지만, 실생활에서는 대분수가 편리합니다.
설탕을 "1과 1/2 스푼" 넣으세요 라는 문장을
설탕을 "3/2 스푼" 넣으세요 라고, 즉 "2분의 3" 스푼으로 바꾸면, 쉽게 이해하기 힘들게 됩니다.
그리고
후추를 "5와 1/3 스푼" 넣으세요 라는 문장은 쉽지만
후추를 "16/3 스푼" 넣으세요 즉, "3분의 16 스푼" 이라는 문장은 알기 어렵습니다.
가분수를 대분수로 고치기 방법
(1) "분자 나누기 분모"를 구하면
(2) "몫"은 정수부, "나머지"는 진분수의 분자가 됨
(3) 분모는 변경되지 않음.
(4) 약분 가능하면 약분해야 함
예제:
"16/3" (3분의 16) 이라는 가분수를 대분수로 고치려면
♣ 16 나누기 3 을 합니다.
3 x 5 = 15 이기에, 이 경우, 몫은 5 이고, 나머지는 1 입니다.
♣ 5와 1/3 이라는 대분수로 고쳐집니다. (소수로는 5.333333 이라는 값을 가짐)
대분수로 변환 함수; Convert Improper Fraction To Mixed Number
혹시 이런 기능의 함수가 내장되어 있는지 찾아보아도 없어서, 다음과 같은 함수를 만들어 보았습니다. 매스매티카는 내장 함수가 아닌 경우, 함수명이 소문자로 시작해야 합니다.
옆으로스크롤가능
mixedFraction[x_] := Print[IntegerPart[Numerator[x]/Denominator[x]], " + ", FractionalPart[Numerator[x]/Denominator[x]]]
(매스매티카의 특성상, 앞에서 말한 변환 공식과는 조금 다릅니다. 변환 공식대로 함수를 만들면 좀 길이가 길어져서...)
이제 위의 함수 정의를 복사하여, 매스매티카 노트북(하얀 빈 종이)에 붙여 넣고 Shift+Enter키를 눌러 입력합니다.
그런 후
mixedFraction[3/2]
이라고 하면 "2분의 3"이라는 가분수가 "1 + 2분의 1"이라는 대분수로 변환됩니다. 모호함을 피하기 위해 정수부와 진분수 사이에 플러스 기호를 넣어 주었습니다.
텍스트 모드 매스매티카에서의 실행 결과 화면:
In[1]:= mixedFraction[x_] := Print[IntegerPart[Numerator[x]/Denominator[x]], " +
", FractionalPart[Numerator[x]/Denominator[x]]]
In[2]:=
In[2]:=
In[2]:= mixedFraction[3/2]
1
1 + -
2
In[3]:=
", FractionalPart[Numerator[x]/Denominator[x]]]
In[2]:=
In[2]:=
In[2]:= mixedFraction[3/2]
1
1 + -
2
In[3]:=
▶▶ Mathematica 매스매티카] 대분수를 가분수로 바꾸기, 입력 방법; To Improper Fraction
대분수 가분수 변환기 (웹브라우저에서): ▶▶ 대분수 가분수 변환 계산기; Mixed Number Calc
tag: mathematica
매스매티카 Mathematica | 수학 Math
tag: study
학습 | Study
<< Home