एक इनपुट स्ट्रिंग, उत्पादन है कि सभी स्वरों के साथ स्ट्रिंग को देखते हुए a, e, i, oऔर uयादृच्छिक पर एक दूसरे के बीच बदली।

उदाहरण के लिए, स्ट्रिंग में this is a test, 4 स्वर हैं [i, i, a, e]:। [a, i, e, i]इसलिए उन स्वरों का एक मान्य फेरबदल इसलिए आउटपुट दे सकता है thas is e tist।

फेरबदल के बारे में

यदि हम समान स्वरों को विशिष्ट मानते हैं तो सभी फेरबदल समान रूप से होने की संभावना होगी । उपरोक्त उदाहरण के लिए, वे 24 फेरबदल संभव हैं:

[i ₁ , i ₂ , a, e] [i ₁ , i ₂ , e, a] [i ₁ , a, i ₂ , e] [i ₁ , a, e, i ₂ ]
[i ₁ , e, i ₂ , a] [i ₁ , e, a, i ₂ ] [i ₂ , i ₁ , a, e] [i ₂ , i ₁ , e, a]
[i ₂ , a, i ₁ , e] [i ₂ , a, e, i ₁ ] [i ₂ , e, i ₁ , a] [i ₂ , e, a, i ₁ ]
[ए, आई _१ , आई _२ , ई] [ए, आई _१ , ई, आई _२ ] [ए, आई _२ , आई _१ , ई] [ए, आई _२ , ई, आई _१ ]
[ए, ई, आई _१ , आई _२ ] [ए, ई, आई _२ , आई _१ ] [ई, आई _१ , आई _२ , ए] [ई, आई _१ , ए, आई _२ ]
[ई, आई _२ , आई _१ , ए] [ई, आई _२ , ए, आई _१ ] [ई, ए, आई _१ , आई _२ ] [ई, ए, आई _२ , आई _१ ]

प्रत्येक को समान रूप से संभावना होनी चाहिए।

आप पूरे स्ट्रिंग के यादृच्छिक फेरबदल की कोशिश नहीं कर सकते जब तक कि सभी स्वर सही जगह पर न हों। संक्षेप में, यदि इनपुट स्थिर है तो आपके कोड का चलने का समय स्थिर रहेगा।

इनपुट और आउटपुट

आप मान सकते हैं कि इनपुट के सभी अक्षर लोअरकेस या अपरकेस होंगे। आप मिश्रित आवरण का भी समर्थन कर सकते हैं, हालांकि यह आपको कोई बोनस नहीं देगा।
इनपुट में हमेशा मुद्रण योग्य ASCII वर्ण शामिल होंगे। सभी वर्ण जो इनपुट में हैं वे आउटपुट में होंगे, केवल स्वरों को चारों ओर फेर दिया जाना चाहिए और कुछ नहीं।
इनपुट खाली हो सकता है। इस बात की कोई गारंटी नहीं है कि इनपुट में कम से कम एक स्वर या कम से कम एक गैर-स्वर होगा।
आप STDINफ़ंक्शन पैरामीटर या कुछ भी समान के रूप में इनपुट ले सकते हैं ।
आप आउटपुट को प्रिंट कर सकते हैं STDOUT, इसे किसी फ़ंक्शन या किसी समान से वापस कर सकते हैं।

परीक्षण के मामलों

पहली पंक्ति दी गई इनपुट है। दूसरी पंक्ति संभावित आउटपुट में से एक है।

<empty string>
<empty string>

a
a

cwm
cwm

the quick brown fox jumps over the lazy dog.
tho qeuck brewn fax jumps ovir the lozy dog.

abcdefghijklmnopqrstuvwxyz
abcdefghujklmnipqrstovwxyz

programming puzzles & code golf
pregromming pezzlos & coda gulf

fatalize
fitaleza

martin ender
mirten ander

स्कोरिंग

यह कोड-गोल्फ , सा थो शर्टिस्ट एनस्वाइर एन बाइट्स वॉन है ।

— Fatalize
स्रोत

17

आप अंग्रेजी / अमेरिकी लोगों और yस्वर के रूप में आपकी कमी ..;)

— केविन क्रूज़सेन

6

@ केविनक्रूजसेन मैं एक देशी वक्ता नहीं हूं और मैं yएक स्वर को भी मानूंगा , लेकिन अंतिम चुनौती जहां मैंने कहा yकि एक स्वर था मुझे पूछा गया कि मैंने इसे क्यों चुना!

— घातक

7

@ केविनक्रूजसेन, अक्षर स्वर नहीं हैं: ध्वनियाँ हैं।

— पीटर टेलर

6

Cwm के लिए +1। पर्वतारोहण और / या वेल्श को जीवित रखना;)

— बीटा डेके

2

@KevinCruijssen क्या एक सह नहीं w VO के बारे में डब्ल्यू ELS जो सामान्य रूप से तो नहीं माना जाता।

— corsiKa

13

जेली , 15 बाइट्स

f€“¡ẎṢɱ»ðœpżFẊ¥

इसे ऑनलाइन आज़माएं!

यह काम किस प्रकार करता है

f€“¡ẎṢɱ»ðœpżFẊ¥  Main link. Argument: s (string)

  “¡ẎṢɱ»         Yield "aeuoi"; concatenate "a" with the dictionary word "euoi".
f€               Filter each character in s by presence in "aeuoi".
                 This yields A, an array of singleton and empty strings.
        ð        Begin a new, dyadic chain. Left argument: A. Right argument: s
         œp      Partition s at truthy values (singleton strings of vowels) in A.
            FẊ¥  Flatten and shuffle A. This yields a permutation of the vowels.
           ż     Zip the partition of consonants with the shuffled vowels.

— डेनिस
स्रोत

यह अन्य उत्तरों की तुलना में काफी धीमा क्यों लगता है?

— घातक

जेली कुछ और करने से पहले SymPy और NumPy का आयात करती है। यह कार्यक्रम और खाली कार्यक्रम लगभग एक ही निष्पादन समय है।

— डेनिस

15

इससे पहले कि कोई पूछे, ईओयू प्राचीन बेसिक रिवील्स में अगोचर उत्साह का रोना है ।

— डेनिस

5

@ डेनिस जिज्ञासा से बाहर है, लेकिन जेली ने शब्दकोषों में क्यों बनाया है? इसे ये शब्द कहां से मिलते हैं?

— केविन क्रूज़सेन

1

@ केविनक्रूजसेन जब मैंने जैली को डिज़ाइन किया था, तो पहले से ही कुछ गोल्फ भाषाएँ थीं जो कि शोको का इस्तेमाल करती थीं , और बस एक अंग्रेजी शब्दकोश का उपयोग करना उस विचार पर सुधार करने के लिए एक अच्छा तरीका लगता था। मैंने /usr/share/dict/wordsअपने कंप्यूटर से फ़ाइल का उपयोग किया और इसे जेली दुभाषिया में शामिल किया।

— डेनिस

17

आर, 92 91

अभी तक कोई टिप्पणी नहीं कर सकता, इसलिए मैं अपने खुद के जवाब को @ आंद्रे कोस्टीर्का उत्तर के समान ही जोड़ रहा हूं (विश्वास करें या नहीं लेकिन स्वतंत्र रूप से इसके साथ आया था)।

s=strsplit(readline(),"")[[1]];v=s%in%c("a","e","i","o","u");s[v]=sample(s[v]);cat(s,sep="")

Ungolfed

s=strsplit(readline(),"")[[1]]    # Read input and store as a vector
v=s%in%c("a","e","i","o","u")     # Return TRUE/FALSE vector if vowel
s[v]=sample(s[v])                 # Replace vector if TRUE with a random permutation of vowels
cat(s,sep="")                     # Print concatenated vector

@Vlo को एक बाइट धन्यवाद दिया

s=strsplit(readline(),"")[[1]];s[v]=sample(s[v<-s%in%c("a","e","i","o","u")]);cat(s,sep="")

— Billywob
स्रोत

5

ईमानदारी से, मैं विश्वास नहीं कर सकता। मजाक कर रहा हूं। कुछ बाइट बचाने के लिए अच्छी ट्रिक!

— आंद्रे

बस ईमानदार होने के लिए, मैं अपने विचारों को चोरी नहीं कर रहा हूं ताकि मेरे जवाब को आगे बढ़ा सकें।

— आंद्रे

3

हे, मुझे लगता है कि मैं टिप्पणी कर सकते हैं उन्हें मीठा upvotes मिल;)

— Billywob

एक बाइट को इन-लाइन असाइनमेंट 91 बाइट्स के साथ सहेजेंs=strsplit(readline(),"")[[1]];s[v]=sample(s[v<-s%in%c("a","e","i","o","u")]);cat(s,sep="")

— Vlo

के el()बजाय का उपयोग करके एक और बाइट बचाओ [[1]]।

— आंद्रे

11

आर, 99 98 89 बाइट्स

x=el(strsplit(readline(),""))
z=grepl("[aeiou]",x)
x[z]=x[sample(which(z))]
cat(x,sep="")

पहला मानव-पठनीय समाधान लगता है! 9 बाइट बचाने के लिए Giuseppe का धन्यवाद !

परीक्षण के मामलों:

tho qaeck bruwn fux jemps over tho lozy dig.
progremmang pozzlos & cide gulf

ऐसा लगता है कि आंतरिक चर असाइनमेंट (अंदर, जैसे, cat) बनाने का कोई तरीका नहीं है , और फिर से कुछ लोग साबित करने जा रहे हैं कि मैं ...

— आंद्रे कोस्टीर्का
स्रोत

2

letters[c(1,5,9,15,21)]1 बाइट लंबी है, और OEIS A161536 और A215721 किसी भी मदद के लिए बहुत कम हैं।

— आंद्रे

z=grepl("[aeiou]",x)कम नहीं होगा ?

— ग्यूसेप

@Giuseppe आपने इसे फिर से किया! धन्यवाद।

— आंद्रे

10

सीजेएम, 23 बाइट्स

lee_{"aeiou"&},_mrerWf=

इसे ऑनलाइन आज़माएं!

व्याख्या

l            e# Read input, e.g. "foobar".
ee           e# Enumerate, e.g. [[0 'f] [1 'o] [2 'o] [3 'b] [4 'a] [5 'r]].
_            e# Duplicate.
{"aeiou"&},  e# Keep those which have a non-empty intersection with this string
             e# of vowels, i.e. those where the enumerated character is a vowel.
             e# E.g. [[1 'o] [2 'o] [4 'a]].
_            e# Duplicate.
mr           e# Shuffle the copy. E.g. [[2 'o] [4 'a] [1 'o]].
er           e# Transliteration. Replaces elements from the sorted copy with
             e# the corresponding element in the shuffled copy in the original list.
             e# [[0 'f] [2 'o] [4 'a] [3 'b] [1 'o] [5 'r]].
Wf=          e# Get the last element of each pair, e.g. "foabor".

— मार्टिन एंडर
स्रोत

5

05AB1E , 17 बाइट्स

žMÃ.r`¹vžMyå_iy}?

व्याख्या

žMÃ                # get all vowels from input
   .r`             # randomize them and place on stack
      ¹v           # for each in input
        žMyå_i }   # if it is not a vowel
              y    # push it on stack
                ?  # print top of stack

इसे ऑनलाइन आज़माएं!

— Emigna
स्रोत

5

पायथन 3, 109 बाइट्स

केवल निचले स्वरों का समर्थन करता है।

अतिरिक्त बाइट बचाने के लिए @ अलीसा का धन्यवाद।

import re,random
def f(s):r='[aeiou]';a=re.findall(r,s);random.shuffle(a);return re.sub(r,lambda m:a.pop(),s)

Ideone यह!

— बीटा डिके
स्रोत

यह छोटा नहीं होगा अगर यह एक फंक्शन ले रहा है और फेरबदल स्वरों के साथ उस स्ट्रिंग को वापस कर रहा है?

— अलिसा

@ एलिसा धन्यवाद, यह एक बाइट बचा लिया! : डी

— बीटा डिके

यकीन नहीं है कि यह किसी भी छोटी होगी, लेकिन आप a.pop(random.randrange(0,len(a)))

— Alissa

4

TSQL, 275 बाइट्स

golfed:

DECLARE @ VARCHAR(99)='the quick brown fox jumps over the lazy dog.'

;WITH c as(SELECT LEFT(@,0)x,0i UNION ALL SELECT LEFT(substring(@,i+1,1),1),i+1FROM c
WHERE i<LEN(@)),d as(SELECT *,rank()over(order by newid())a,row_number()over(order by 1/0)b
FROM c WHERE x IN('a','e','i','o','u'))SELECT @=STUFF(@,d.i,1,e.x)FROM d,d e
WHERE d.a=e.b PRINT @

Ungolfed:

DECLARE @ VARCHAR(max)='the quick brown fox jumps over the lazy dog.'

;WITH c as
(
  SELECT LEFT(@,0)x,0i
  UNION ALL
  SELECT LEFT(substring(@,i+1,1),1),i+1
  FROM c
  WHERE i<LEN(@)
),d as
(
  SELECT 
    *,
    rank()over(order by newid())a,
    row_number()over(order by 1/0)b
  FROM c
  WHERE x IN('a','e','i','o','u')
)
SELECT @=STUFF(@,d.i,1,e.x)FROM d,d e
WHERE d.a=e.b
-- next row will be necessary in order to handle texts longer than 99 bytes
-- not included in the golfed version, also using varchar(max) instead of varchar(99)
OPTION(MAXRECURSION 0) 

PRINT @

बेला

— t-clausen.dk
स्रोत

3

पर्ल, 38 बाइट्स

के लिए +1 शामिल है -p

STDIN पर वाक्य के साथ चलाएँ

vawols.pl <<< "programming puzzles & code golf"

vawols.pl:

#!/usr/bin/perl -p
@Q=/[aeiou]/g;s//splice@Q,rand@Q,1/eg

— टन हास्पेल
स्रोत

3

जावा 7, 243 241 बाइट्स

import java.util.*;String c(char[]z){List l=new ArrayList();char i,c;for(i=0;i<z.length;i++)if("aeiou".indexOf(c=z[i])>=0){l.add(c);z[i]=0;}Collections.shuffle(l);String r="";for(i=0;i<z.length;i++)r+=z[i]<1?(char)l.remove(0):z[i];return r;}

हाँ, यह शायद थोड़ा बहुत गोल्फ हो सकता है, लेकिन जावा के पास इस afaik के लिए कोई आसान बिल्ट-इन नहीं है .. इसके अलावा, मैं थोड़े कोडगॉर्फ़्ड सरणी-संस्करण के लिए भूल गया था Collections.shuffle..

अनगढ़ और परीक्षण के मामले:

इसे यहाँ आज़माएँ।

import java.util.*;
class M{
  static String c(char[] z){
    List l = new ArrayList();
    char i,
         c;
    for(i = 0; i < z.length; i++){
      if("aeiou".indexOf(c = z[i]) >= 0){
        l.add(c);
        z[i] = 0;
      }
    }
    Collections.shuffle(l);
    String r = "";
    for(i = 0; i < z.length; i++){
      r += z[i] < 1
               ? (char)l.remove(0)
               : z[i];
    }
    return r;
  }

  public static void main(String[] a){
    System.out.println(c("".toCharArray()));
    System.out.println(c("a".toCharArray()));
    System.out.println(c("cwm".toCharArray()));
    System.out.println(c("the quick brown fox jumps over the lazy dog.".toCharArray()));
    System.out.println(c("abcdefghijklmnopqrstuvwxyz".toCharArray()));
    System.out.println(c("programming puzzles & code golf".toCharArray()));
    System.out.println(c("fatalize".toCharArray()));
    System.out.println(c("martin ender".toCharArray()));
  }
}

संभव उत्पादन:

a
cwm
tha queck brown fox jumps evor tho lezy dig.
ebcdifghujklmnopqrstavwxyz
prigrommeng puzzlos & cade golf
fatelazi
mertan inder

— केविन क्रूज़सेन
स्रोत

1

iदूसरे लूप में पुन: उपयोग कैसे करें ?

— फ्रोज़न

मैंने सोचा था कि "वह एक सूची के बजाय चार [] के साथ क्यों नहीं गया", इसलिए मैंने शुरू किया, लेकिन Arrays.shuffleमुझे वहीं रोक दिया ...

— ओलिवियर ग्राएगोइरे

कुछ नाबालिगों के साथ 6 किरदार शेव किए गए:

import java.util.*;String c(char[]z){List l=new ArrayList();int i=0,j=z.length;for(;i<j;i++)if("aeiou".indexOf(z[i])>=0){l.add(z[i]);z[i]=0;}Collections.shuffle(l);String r="";for(i=0;i<j;i++)r+=z[i]<1?(char)l.remove(0):z[i];return r;}

— Durron597

3

पर्ल 6 , 65 बाइट्स

{my \v=m:g/<[aeiou]>/;my @a=.comb;@a[v».from]=v.pick(*);@a.join}

अनाम फ़ंक्शन। लोअर-केस इनपुट मानता है।

( इसे ऑनलाइन आज़माएं )

— SMLS
स्रोत

3

रूबी 45 + 1 = 46 बाइट्स

-pझंडे के लिए +1 बाइट

a=$_.scan(e=/[aeiou]/).shuffle
gsub(e){a.pop}

— जॉर्डन
स्रोत

3

ब्रेकीलॉग , 39 बाइट्स

@eI:1aToS,I:2f@~:LcS,Tc
.'~e@V;
e.~e@V,

इसे ऑनलाइन आज़माएं!

व्याख्या

मुख्य विधेय:

@eI        I is the list of chars of the input.
:1aT       T is I where all vowels are replaced with free variables.
oS,        S is T sorted (all free variables come first).
I:2f       Find all vowels in I.
@~         Shuffle them.
:LcS,      This shuffle concatenated with L (whatever it may be) results in S.
             This will unify the free variables in S with the shuffled vowels.
Tc         Output is the concatenation of elements of T.

1 समर्पित करें:

.          Input = Output…
'~e@V      …provided that it is not a vowel.
;          Otherwise Output is a free variable.

2 समर्पित करें:

e.         Output is an element of the input…
~e@V,      … and it is a vowel.

— Fatalize
स्रोत

3

जावास्क्रिप्ट (ईएस 6), 78 76 बाइट्स

s=>s.replace(r=/[aeiou]/g,_=>l.pop(),l=s.match(r).sort(_=>Math.random()-.5))

सहेजे गए 2 बाइट्स अप्सिलर्स के लिए धन्यवाद

वैकल्पिक संस्करण apsillers (साथ ही 76 बाइट्स) द्वारा प्रस्तावित

s=>s.replace(r=/[aeiou]/g,[].pop.bind(s.match(r).sort(_=>Math.random()-.5)))

परीक्षा

let f =
s=>s.replace(r=/[aeiou]/g,_=>l.pop(),l=s.match(r).sort(_=>Math.random()-.5))

console.log(f("the quick brown fox jumps over the lazy dog."))

स्निपेट का विस्तार करें

— Arnauld
स्रोत

1

कोई सुधार नहीं (ठीक उसी स्कोर), लेकिन एक मज़ेदार कुरूपता मुझे मिली: l=...पूरी तरह से छोड़ दें और [].pop.bind(s.match(r).sort(_=>Math.random()-.5)))दूसरे फ़ंक्शन के लिए replace(एक तीर फ़ंक्शन के बजाय) के रूप में बाध्य फ़ंक्शन का उपयोग करें । हो सकता है कि उस सड़क के नीचे एक सुधार पाया जाए, लेकिन मुझे अभी तक कोई नहीं मिला है। यदि आपने JS-superset भाषा का उपयोग किया है जिसमें बाइंड ऑपरेटर है ::, तो मुझे लगता है कि आप कर सकते थे (s.match(r).sort(_=>Math.random()-.5)))::pop।

— अप्सिलर्स

3

MATL , 15 बाइट्स

tt11Y2m)tnZr7M(

इसे ऑनलाइन आज़माएं!

व्याख्या

tt      % Take input string implicitly. Duplicate twice
11Y2    % Predefined string: 'aeiou'
m       % Logical index that contains true for chars of the input that are vowels
)       % Get those chars from the input string. Gives a substring formed by the
        % vowels in their input order
tnZr    % Random permutation of that substring. This is done via random sampling
        % of that many elements without replacement
7M      % Push logical index of vowel positions again
(       % Assign the shuffled vowels into the input string. Display implicitly

— लुइस मेंडो
स्रोत

3

जाप v2.0a0, 14 13 बाइट्स

ō²f\v
NÌr\v@o

कोशिश करो

व्याख्या

           :Implicit input of string U.
ö²         :Generate a random permutation of U.
  f\v      :Get all the vowels as an array.
\n         :Assign that array to U.
NÌ         :Get the last element in the array of inputs (i.e., the original value of U)
  r\v      :Replace each vowel.
     @o    :Pop the last element from the array assigned to U above.

— झबरा
स्रोत

2

पायथ, 26 बाइट्स

J"[aeiou]"s.i:QJ3.Sf}TPtJQ

एक प्रोग्राम जो एक उद्धृत स्ट्रिंग का इनपुट लेता है और फेरबदल स्ट्रिंग को प्रिंट करता है।

इसे ऑनलाइन आज़माएं

यह काम किस प्रकार करता है

J"[aeiou]"s.i:QJ3.Sf}TPtJQ  Program. Input: Q
J"[aeiou]"                  J="[aeiou]"
             :QJ3           Split Q on matches of regex J, removing vowels
                      PtJ   J[1:-1], yielding "aeiou"
                   f}T   Q  Filter Q on presence in above, yielding vowels
                 .S         Randomly shuffle vowels
           .i               Interleave non-vowel and vowel parts
          s                 Concatenate and implicitly print

— TheBikingViking
स्रोत

2

PHP, 144 129 बाइट्स

लोअरकेस इनपुट का उपयोग करना

$r=Aaeiou;$v=str_shuffle(preg_replace("#[^$r]+#",'',$a=$argv[1]));for(;$i<strlen($a);)echo strpos($r,$a[$i++])?$v[$j++]:$a[$i-1];

स्पष्टीकरण:

$r="aeiou"; // set vowels

preg_replace("#[^$r]+#",'',$argv[1]) // find all vowels in input

$v=str_shuffle() // shuffle them

for(;$i<strlen($a);) // run through the text

strpos($r,$a[$i++])?$v[$j++]:$a[$i-1]; // if it's a vowel print the j-th shuffled vowel else print original text

— क्रिप्टो
स्रोत

2

दरअसल, 24 बाइट्स

;"aeiou";╗@s@`╜íu`░╚@♀+Σ

इसे ऑनलाइन आज़माएं!

स्पष्टीकरण:

;"aeiou";╗@s@`╜íu`░╚@♀+Σ
;                         dupe input
 "aeiou";╗                push vowels, store a copy in reg0
          @s              split one copy of input on vowels
            @`╜íu`░       take characters from other copy of input where
              ╜íu           the character is a vowel (1-based index of character in vowel string is non-zero)
                   ╚      shuffle the vowels
                    @♀+   interleave and concatenate pairs of strings
                       Σ  concatenate the strings

— मेगो
स्रोत

2

बैश, 75 बाइट्स

paste -d '' <(tr aeoiu \\n<<<$1) <(grep -o \[aeiou]<<<$1|shuf)|paste -sd ''

स्ट्रिंग को तर्क के रूप में लेता है और परिणाम को स्टैडआउट में प्रिंट करता है।

उदाहरण के लिए

for x in "" "a" "cwm" \
         "the quick brown fox jumps over the lazy dog." \
         "abcdefghijklmnopqrstuvwxyz" \
         "programming puzzles & code golf" \
         "fatalize" "martin ender"; do
  echo "$x";. sheffle.sh "$x"; echo
done

प्रिंट

<blank line>
<blank line>

a
a

cwm
cwm

the quick brown fox jumps over the lazy dog.
tho quuck brown fix jamps ever the lozy dog.

abcdefghijklmnopqrstuvwxyz
ibcdefghajklmnopqrstuvwxyz

programming puzzles & code golf
progremmong pazzlus & cedo gilf

fatalize
fetilaza

martin ender
mertan endir

— rici
स्रोत

2

बैश, 89

सभी इनपुट को लोअरकेस मान लेता है।

a=`tee z|grep -o [aeiou]`
[ -n "$a" ]&&tr `tr -d \ <<<$a` `shuf -e $a|tr -d '
'`<z||cat z

2

PowerShell v3 +, 155 99 बाइट्स

param([char[]]$n)$a=$n|?{$_-match'[aeiou]'}|sort{random};-join($n|%{if($_-in$a){$a[$i++]}else{$_}})

56-बाइट गोल्फ के लिए @ बेन ओवेन को बड़ा सहारा

$nसभी लोअरकेस से अपेक्षा करते हुए इनपुट लेता है , तुरंत इसे एक char-रे के रूप में रखता है।

हम पाइप कि एक में Where-Objectखंड उन तत्वों बाहर निकलने के लिए है कि -matchएक स्वर, के लिए पाइप उन्हें Sort-Objectसाथ {Get-Random}छँटाई तंत्र के रूप में। Get-Randomक्वालीफायर के बिना कॉल करने पर 0और [int32]::MaxValue- यानी, फ्लाइट के प्रत्येक तत्व को रैंडम वेट असाइन करने के बीच एक पूर्णांक वापस आ जाएगा । हम यादृच्छिक स्वरों को स्टोर करते हैं $a।

अंत में, हम के माध्यम से लूप $n। प्रत्येक तत्व के लिए |%{...}, यदि वर्तमान वर्ण कहीं है -in $a, तो हम अगले तत्व को अगली बार के लिए $aपोस्ट-इंक्रीमेंट में आउटपुट करते हैं $i। अन्यथा, हम वर्तमान चरित्र का उत्पादन करते हैं। यह सब Parens में समझाया गया है और -joinएक स्ट्रिंग में एक साथ संपादित किया गया है। उस तार को पाइप लाइन पर छोड़ दिया जाता है, और आउटपुट प्रोग्राम निष्कर्ष पर निहित होता है।

परीक्षण के मामलों

PS C:\Tools\Scripts\golfing> 'a','cwm','the quick brown fox jumps over the lazy dog.','abcdefghijklmnopqrstuvwxyz','programming puzzles & code golf','fatalize','martin ender'|%{.\vawols.ps1 $_}
a
cwm
thu qaeck brown fix jomps ovor thu lezy deg.
abcdofghejklmnupqrstivwxyz
prugrammong pizzles & code golf
fitaleza
mertin endar

— AdmBorkBork
स्रोत

आप यहाँ बहुत से बाइट्स बचा सकते हैं, जो $nपात्रों के माध्यम से पुनरावृत्ति करते हैं और प्रत्येक स्वर पर मेल खाते charहैं, इसके बजाय स्वर के -Rray को आउटपुट करने के लिए। कुछ इस तरह:$a=[char[]]$n|?{$_-match'[aeiou]'}|sort{random}

— बेन ओवेन

@ बेनोवेन पवित्र खतरे, हाँ। 56-बाइट गोल्फ के लिए धन्यवाद। मेरे जीवन के लिए, मैं सिर्फ एक बेहतर तरीका नहीं बना सका $a।

— AdmBorkBork

2

पायथन 3, 106 बाइट्स

केवल लोअरकेस।

import re,random
def f(s):s=re.split('([aeiou])',s);v=s[1::2];random.shuffle(v);s[1::2]=v;return''.join(s)

— केन 'जॉय' मोशेर
स्रोत

1

PHP> = 5.3 , 139 136 बाइट्स (और कोई त्रुटि नहीं)

array_map(function($a,$b){echo$a.$b;},preg_split("/[aeiou]/",$s=$argv[1]),str_split(str_shuffle(implode(preg_split("/[^aeiou]/",$s)))));

— MonkeyZeus
स्रोत

1

के (ओके) , 29 बाइट्स

उपाय:

{x[a:&x in"aeiou"]:x@(-#a)?a}

इसे ऑनलाइन आज़माएं!

उदाहरण:

"pregrommeng pizzlas & codo gulf"
{x[a:&x in"aeiou"]:x@(-#a)?a}"programming puzzles & code golf"
"pregremmong puzzlos & coda gilf"
{x[a:&x in"aeiou"]:x@(-#a)?a}"programming puzzles & code golf"
"pregrommeng pazzlos & cidu golf"

स्पष्टीकरण:

स्वरों के स्थानों का पता लगाएं और यादृच्छिक क्रम में खींचे गए स्वरों के साथ बदलें।

{x[a:&x in"aeiou"]:x@(-#a)?a} / the solution
{                           } / anonymous function with input x
 x[              ]            / index into x at these indices
      x in"aeiou"             / is character a vowel
     &                        / indices where true
   a:                         / assign to add
                  :           / assign
                          ?a  / draw randomly from a
                     (   )    / do this together
                       #a     / count length of a
                      -       / negate (draws from list, no duplication)
                   x@         / apply these indices to input

— streetster
स्रोत

0

एपीएल (डायलॉग यूनिकोड) , 21 बाइट्स

{⍵[?⍨≢⍵]}@{⍵∊'AEIOU'}

इसे ऑनलाइन आज़माएं!

ऊपरवाला मानता है।

— आउटग्रॉफर को एरिक करें
स्रोत

क्या {⍵∊'AEIOU'}→ ∊∘'AEIOU'काम करेगा?

— क्रिति लिथोस

@ मुझे लगता है कि ऐसा नहीं है, तब से इसे के रूप में पार्स किया जाएगा ({⍵[?⍨≢⍵]}@∊)∘'AEIOU'।

— एर्ग आउटफोलर

0

कोटलिन , 122 118 बाइट्स

x->val v=x.filter{"aeiuo".contains(it)}.toList().shuffled()
x.split(Regex("[aeiou]")).reduceIndexed{i,a,s->a+v[i-1]+s}

इसे ऑनलाइन आज़माएं!

— Makotosan
स्रोत

शेफ़ीले वो वौल्स यूरेन्ड!

फेरबदल के बारे में

इनपुट और आउटपुट

परीक्षण के मामलों

स्कोरिंग

जेली , 15 बाइट्स

यह काम किस प्रकार करता है

आर, 92 91

Ungolfed

आर, 99 98 89 बाइट्स

सीजेएम, 23 बाइट्स

व्याख्या

05AB1E , 17 बाइट्स

पायथन 3, 109 बाइट्स

TSQL, 275 बाइट्स

पर्ल, 38 बाइट्स

जावा 7, 243 241 बाइट्स

पर्ल 6 , 65 बाइट्स

रूबी 45 + 1 = 46 बाइट्स

ब्रेकीलॉग , 39 बाइट्स

व्याख्या

जावास्क्रिप्ट (ईएस 6), 78 76 बाइट्स

वैकल्पिक संस्करण apsillers (साथ ही 76 बाइट्स) द्वारा प्रस्तावित

परीक्षा

MATL , 15 बाइट्स

व्याख्या

जाप v2.0a0, 14 13 बाइट्स

व्याख्या

पायथ, 26 बाइट्स

PHP, 144 129 बाइट्स

दरअसल, 24 बाइट्स

बैश, 75 बाइट्स

बैश, 89

PowerShell v3 +, 155 99 बाइट्स

परीक्षण के मामलों

पायथन 3, 106 बाइट्स

PHP> = 5.3 , 139 136 बाइट्स (और कोई त्रुटि नहीं)

के (ओके) , 29 बाइट्स

एपीएल (डायलॉग यूनिकोड) , 21 बाइट्स

कोटलिन , 122 118 बाइट्स