quick sort
2016-06-18 18:47:41

//등호 부등호는 너무헷갈린다

#include <stdio.h>

#include <stdlib.h>

#include <time.h>

int a[1000000];

inline int swap(int *a, int * b){

int temp = *a;

*a = *b;

*b = temp;

}

int partition(int start, int last){

int l = start;

int r = last - 1;

int pivot = a[start];

while(l < r){

for(; a[l] <= pivot && l < last ; l++);

for(; a[r] > pivot ; r--);

if(l < r){

swap(&a[l],&a[r]);

}

}

swap(&a[start],&a[r]);

return r;

}

void quicksort(int l,int r){

if(l<r){

int a = partition(l,r);

quicksort(l, a);

quicksort(a + 1 , r);

}

}

int main(){

srand (time(NULL));

for(int i=0;i<1000;i++){

a[i] = rand() % 1000;

}

quicksort(0,1000);

for(int i=0;i<1000;i++){

if(i>0 && a[i-1] > a[i]) printf("error!

");

printf("%d ",a[i]);

}

printf("

");

}

▼ more
이를 어쩌면 좋단 말인가 ㅋ
2016-06-11 14:22:33

PM 2:21 "나수박은사놓았지만혼자먹으려니먹고싶지않네 ㅠ"

이 세상 모든 수박에게 내가 정말 미안하다

▼ more
SVD Rscript
2016-06-10 22:22:46

WARN: Some values are hard coded!!

Dimensionality Reduction from 7395 to 100

Is it reasonable ??

library(lsa)

print("lsa loaded")

TD <- read.csv(file="lyrics.spring.tdm",head=FALSE,sep=",")

print("csv loaded")

TD.svd=svd(TD)

print("svd finished")

rtd=TD.svd$u[,1:100] %*% diag(TD.svd$d[1:100]) %*% t(TD.svd$v[,1:100])

print("svd multiplication finished")

i=0;while(i < 7395){i=i+1; write(cosine(rtd[,1:1],rtd[,i:i]),file="lyrics.spring.csv", append=TRUE)}

print("all done")

▼ more
베이지안으로 산다는 것은
2016-06-09 22:18:27

http://www.behind-the-enemy-lines.com/2008/01/are-you-bayesian-or-frequentist-or.html

아 내가 그렇다는 것은 아니고 ㅎㅎ

▼ more