직무

두 개의 문자 목록이 주어지면, 그들의 직교 곱, 즉 첫 번째 목록의 각 문자와 두 번째 목록의 각 문자 쌍의 목록을 출력하십시오.

예

"123456"그리고 "abcd":

[["1","a"],["1","b"],["1","c"],["1","d"],["2","a"],["2","b"],["2","c"],["2","d"],["3","a"],["3","b"],["3","c"],["3","d"],["4","a"],["4","b"],["4","c"],["4","d"],["5","a"],["5","b"],["5","c"],["5","d"],["6","a"],["6","b"],["6","c"],["6","d"]]

입력

두 개의 문자 또는 문자열 목록. 사용 된 문자는 영숫자 a-z, A-Z, 0-9이며 문자는 여러 번 동시에 두 입력에서 모두 발생할 수 있습니다.

산출

입력 목록의 데카르트 곱. 즉, 첫 번째 목록의 문자와 두 번째 목록의 문자가 가능한 순서대로 나열됩니다. 각 쌍은 목록 또는 문자열이거나 두 문자 또는 두 개의 길이가 하나 인 문자열입니다. 출력 길이는 입력 길이의 곱과 같습니다.

쌍은 순서대로 나열되어야합니다. 첫 번째 목록의 첫 번째 문자를 두 번째 목록의 첫 번째 문자와 함께 나열한 다음 첫 번째 목록의 첫 번째 문자의 모든 쌍을 나열합니다. 마지막 쌍은 첫 번째 목록의 마지막 문자와 두 번째 목록의 마지막 문자로 구성됩니다.

출력은 단순 쌍의 목록이어야합니다. 쌍이 첫 번째 또는 두 번째 요소로 그룹화되는 2D 행렬이 아닙니다.

테스트 사례

inputs               output

"123456", "abcd"     [["1","a"],["1","b"],["1","c"],["1","d"],["2","a"],["2","b"],["2","c"],["2","d"],["3","a"],["3","b"],["3","c"],["3","d"],["4","a"],["4","b"],["4","c"],["4","d"],["5","a"],["5","b"],["5","c"],["5","d"],["6","a"],["6","b"],["6","c"],["6","d"]]
"abc", "123"         [["a","1"],["a","2"],["a","3"],["b","1"],["b","2"],["b","3"],["c","1"],["c","2"],["c","3"]]
"aa", "aba"          [["a","a"],["a","b"],["a","a"],["a","a"],["a","b"],["a","a"]]

05AB1E , 1 바이트

â

온라인으로 사용해보십시오!

하스켈 , 12 바이트

(<*>).map(,)

온라인으로 사용해보십시오!

수학, 12 바이트

Tuples@{##}&

두 개의 문자 목록을 입력으로 사용합니다.

APL (Dyalog) , 4 바이트

,∘.,

온라인으로 사용해보십시오!

, 반음 낮추다

∘. 데카르트

, 연쇄

루비 , 30 18 바이트

요르단에서 -12 바이트는 사양을 사용하는 방법을 상기시켜줍니다.

문자 목록을 입력으로 사용합니다.

->a,b{a.product b}

온라인으로 사용해보십시오!

펄 6 , 4 바이트

&[X]

이것은 내장 된 교차 제품 연산자에 대한 참조 일뿐 X입니다. 문자뿐만 아니라 모든 종류의 목록에서 작동합니다.

젤리 , 1 바이트

p

온라인으로 사용해보십시오!

옥타브, 32 바이트

@(a,b)[(a+~b')(:) (b'+~a)(:) '']

온라인으로 사용해보십시오!

Tcl , 60 바이트

proc p x\ y {lmap X $x {lmap Y $y {lappend l $X\ $Y}};set l}

사용하다:

% p {1 2 3} {a 2 2}
{1 a} {1 2} {1 2} {2 a} {2 2} {2 2} {3 a} {3 2} {3 2}

자바 스크립트 (ES6), 45 36 34 33 바이트

Firefox가 필요합니다. 두 입력을 모두 문자열 또는 개별 문자의 배열로 사용합니다.

a=>b=>[for(x of a)for(y of b)x+y]

• CalculatorFeline 이 잘못된 점을 발견하여 -1 바이트 <space>.

시도 해봐

f=
a=>b=>[for(x of a)for(y of b)x+y]
oninput=_=>console.clear()&console.log(f(i.value)(j.value))
console.log(f(i.value="123456")(j.value="abcd"))

<input id=i><input id=j>

배쉬, 18

이는 중괄호 확장으로 수행 할 수 있습니다.

eval echo {$1}{$2}

온라인으로 사용해보십시오 .

Brachylog , 5 바이트

{∋ᵐ}ᶠ

온라인으로 사용해보십시오!

설명

꽤 자기 설명

{  }ᶠ       Find all:
  ᵐ           Map:
 ∋              In

QBIC , 29 바이트

[_l;||[_l;||?_sA,a,1|+_sB,b,1

이렇게하면 모든 조합의 2 문자열을 한 줄에 인쇄합니다.

설명

   ;      Read in string A$
 _l |     Get its length as b
[    |    and kick off a FOR-loop from 1 to that
[_l;||    Do the same for B$
          Note that, while the FOR-loop may pass this code several times, the
          'read-from cmd line' is done only once.
?_sA,a,1| PRINT the character from A$ at the position of the 'a' loop counter
+_sB,a,1   concatenated with the char from B$ at the pos of the 'b' loop counter

Pyth , 3 바이트

*ww

두 개의 문자열을 곱하면 직교 곱의 역할을합니다.

온라인으로 테스트하십시오!

MATL , 2 바이트

Z*

*는 제품의 일반 연산자이며 접두사 Z는 제품을 직교 곱으로 만들고 두 개의 문자열을 인수로 사용할 수 있습니다.

온라인으로 사용해보십시오!

실제로 1 바이트

∙

온라인으로 사용해보십시오!

∙ 카티 전 곱 명령입니다.

옴 , 1 바이트

╒

온라인으로 사용해보십시오!

말 그대로 내장

J, 3 바이트

,@{

이것은 J 의 카탈로그 동사 입니다 ,. 결과를 1 차원으로 만들 려면 Ravel ( ) 해야 합니다.

온라인으로 사용해보십시오!

공통 리스프, 63 바이트

(lambda(a b)(mapcan(lambda(x)(mapcar(lambda(y)(list x y))b))a))

온라인으로 사용해보십시오!

클로저, 21 바이트

#(for[i % j %2][i j])

PHP , 69 바이트

<?foreach($_GET[0]as$x)foreach($_GET[1]as$y)$r[]=[$x,$y];print_r($r);

온라인으로 사용해보십시오!

파이썬 2 , 39 바이트

lambda x,y:[[i,j]for i in x for j in y]

온라인으로 사용해보십시오!

대체 솔루션, 34 30 바이트

Anders Kaseorg 덕분에 -4 바이트.

이것에 대한 내장이 있습니다 ...

from itertools import*
product

체다 , 52 바이트

a->b->a.chars.map(i->b.chars.map(i&(+))).reduce((+))

온라인으로 사용해보십시오!

05AB1E , 10 바이트

v²NFÀ}¹ø)˜

온라인으로 사용해보십시오!

이것은 기본 제공 기능이 없으며 의심 할 여지없이 경쟁력이 없습니다.

레티 나 , 49 바이트

.(?=.*¶(.+))
$1$&¶
¶¶.+
¶
.(?=.*(.)¶)
$1$&¶
¶.¶
¶

온라인으로 사용해보십시오! 별도의 줄에 입력을받습니다. 설명:

.(?=.*¶(.+))
$1$&¶

첫 번째 문자열의 각 문자는 두 번째 문자열이 앞에 붙는 별도의 줄을 생성합니다.

¶¶.+
¶

원래 두 번째 문자열이 삭제됩니다.

.(?=.*(.)¶)
$1$&¶

첫 번째 문자열의 각 문자에 대해 두 번째 문자열의 각 문자는 첫 번째 문자가 앞에 붙는 별도의 줄을 생성합니다.

¶.¶
¶

첫 번째 문자열에서 남은 문자가 삭제됩니다.

q / kdb +, 5 바이트

해결책:

cross           / yup, there's a built-in to do exactly this

예:

q)"123456"cross"abcd"
"1a"
"1b"
"1c"
"1d"
"2a"
"2b"
"2c"
"2d"
"3a"
"3b"
"3c"
"3d"
"4a"
"4b"
...etc

숯 , 8 7 바이트

ＦθＥη⁺ικ

온라인으로 사용해보십시오! 링크는 자세한 버전의 코드입니다. 설명 : 변수 θ와 η암시는 두 개의 입력 문자열을 참조하십시오. Ｆ그동안 명령은, 첫 번째 입력의 각각의 문자 위에 루프 Ｅ명령이 루프 변수 연접 제 2 입력의 각각의 문자 위에 매핑 ι맵 변수 κ내재적 별도 라인에 인쇄되어있는 결과를.

R , 29 바이트

function(x,y)outer(x,y,paste)

온라인으로 사용해보십시오!

R 행렬은 열로 채워 지므로 결과는 사양에 따라 결정됩니다.

factors입력 및 출력 이 허용되면 내장 기능이 있지만 결과적으로 레벨에서 결과 레벨을 추출해야하므로 결국 29 바이트 이상이됩니다.

R , 11 바이트

interaction

온라인으로 사용해보십시오!

Japt , 5 2 바이트

Japt는 이제 직교 곱을위한 방법을 가지고 있습니다.

입력을 2 개의 문자열 배열로 취합니다.

ïV

시도 해봐

C # 7, 78 63 바이트

(a,b)=>$"({string.Join(",",a.SelectMany(x=>b,(x,y)=>(x,y)))})";