J 함수가 작동하지 않습니다.

Question

저는 J에 대한 완전한 초보자입니다. 함수를 작성하는 첫 번째 시도는 totient 함수와 같습니다. 어떤 숫자 인 i.num이라고 가정하는 배열을 취합니다. 그런 다음 배열의 집계와 일치하는 요소의 수를 계산합니다.

I는 다음과 같이 수동으로 할 경우

작동

numbers =: i.7 
#(1=(#numbers)+./numbers)#numbers 

. 결과는 6입니다.

그래서 이것을 일반적인 기능으로 바꾸고 싶습니다.

Tot =: monad :'(1=(#x)+./x)#x' 
Tot i.11 

이것은 실패하고 x 값 오류가 발생합니다. 나는 이유를 모른다.

Answer 1

모나드의 변수는 y하지 x해야한다 :

Tot =: monad :'(1=(#y)+./y)#y' 

x은 다이 애드의 왼쪽 인수입니다.