小编Jon*_*FTW的帖子

我试图让这个非常简单的脚本替换谷歌上的标题:

// ==UserScript==
// @name           Hell yeah
// @description    HELL YEAH
// @include        http://www.google.*
// ==/UserScript==
GM_addStyle("div #logo {background-image: url('http://img220.imageshack.us/img220/5676/1251559315224.jpg') !important}");

但是当我尝试使用它时没有任何反应.我究竟做错了什么？

我正在做项目euler问题224.并在Haskell中掀起了这个列表理解:

prob39 = length [ d | d <- [1..75000000], c <- [1..37500000], b <-[1..c], a <- [1..b], a+b+c == d, a^2 + b^2 == (c^2 -1)]

我用GHC编译它并且它已经运行了超过一个小时的内核优先级超过一个小时而没有返回结果.我该怎么做才能优化此解决方案？我似乎越来越善于以天真的方式找到蛮力解决方案.我能做些什么吗？

编辑:我也不清楚'积分长度'的定义,这只是意味着边长的大小落在正整数集中,即:1,2,3,4,5 ......？

我有以下代码返回字符串中的循环长度:

module Main where
import Data.List

detec ys n | 2*n > (length ys) = error "no cycle"
           | t == h = (2*n - n)
           | otherwise = detec ys (n+1)
            where
                t = ys !! n
                h = if n == 0 then ys !! 1 else  ys !! (n*2)
f x = detec (show x) 0
answer = map f [1/x|x<-[1..100]]

但我不知道该怎么做是让它忽略"no cycle"异常,以便生成的列表只包含循环字符串的长度.

我怎样才能做到这一点？

我正在使用Haskell来解决euler项目中的问题99,我必须从基本指数对列表中找到最大结果.

我想出了这个:

prob99 = maximum $ map ((fst)^(snd)) numbers

数字的形式如下:

numbers = [[519432,525806],[632382,518061],[78864,613712]..

为什么这不起作用？我需要更改数字的格式吗？这里有一个简单的优化,我没有想到,就像一个更有效的取幂方法？

我正在做另一个项目欧拉问题 - 问题38.我有这个函数返回一个数字列表,但我需要的是数字列表是一个数字.它计算整数的连接乘积.

f (a,b) = a*b
conProInt x n  = map f (zip (replicate n x) ([1..n]))

prob38 = maximum [ (conProInt (x) (n)) | x <- [100..500], n <- [1..9], (sort $ nub $ (decToList $ (conProInt x n) )) == (sort $ (decToList $ (conProInt x n) )), (sort $ nub $ (decToList $ (conProInt x n))) == [1..9] ]

例如:

conProInt 192 3

回报:[192,384,576]

我需要的是:192384576

我已经四处寻找,找不到一个功能,或者想到一个可以构建的功能,可以提供我需要的功能.我该怎么做？

编辑:

我已更新脚本以包含更快的连接,但它不会返回正确的结果:

f (a,b) = a*b
conProInt x n …

我正在尝试制作一个算法来解决Project Euler Problem 255

我想出了这个解决方案:

roundedSq n | (roundedSq n) == roundedSq (n-1) = n : roundedSq (n+1)
            | rem n 2 == 1  = n : floor ( ((2*10^((d-1) `div` 2)) + ceiling (n `div` (2*10^((d-1) `div` 2)) )) `div` 2 )
            | otherwise     = n : floor ( ((7*10^((d-2) `div` 2)) + ceiling (n `div` (7*10^((d-2) `div` 2)) )) `div` 2 )
        where
                d = length (map (digitToInt) (show (n)))

average a = (sum a) `div` (length a) …

我的第一个专业任务是制作一个网站,其中将展示摄影师的作品以供购买或打印.受保护的图像可能会在Perl中生成.但我不知道实现这样一个应用程序的语言.我知道HTML,CSS和一些JavaScript,并且主要有3-4个月的空闲时间来完成项目.

我正在学习JavaScript或ActionScript和Flash之间来完成这个项目.哪个最适合考虑学习语言的时间表？

我已经开始在项目Euler上做关于名称列表的问题,这些名称需要用字母表中的相应位置替换.在问题22中我需要替换,带有数字的字母:

names = ["MARY","PATRICIA","LINDA"....
replace = ??????
char2num a = map replace a
score (a,b) = a * (sum $ map char2num b)
answer = sum $ map score (zip [1..] (sort names))

我找不到的是如何用字母替换字符.我该怎么做才能做替换功能(最好不是正则表达式)？

我有项目euler 问题的以下递归函数.74:

chain n | n `elem` xs = length xs
        | otherwise = (chain (sumFac n)) : xs
fac n = foldl (*) 1 $ enumFromTo 1 n
sumFac n = sum $ map fac $ decToList n

除了我不知道构造列表的正确语法,chain n以便它建立一个列表xs然后返回xs一个数字再次出现在列表中xs并开始循环的长度.

我如何纠正我的链功能以使其工作？

我正在为一个包含4个元素的堆栈编写一个类.定义如下:

// HPStack.h
class HPStack{
public:
        HPStack();
        void push(int x);
        int  pop();
        int  peek();
private:
        int stack[];
};
 // HPStack.cpp
HPStack::HPStack(){
        int stack[4] = {0,0,0,0};
}
// push/pop functions
// ....
int HPStack::peek(){
        return stack[0];
}

然后我称之为:

int main(){
        HPStack* stack = new HPStack();
        cout << stack->peek() << endl;
        return 0;
}

但是当我运行该main函数(用g ++编译)时,它输出:137048当我真的想要它打印时0.这里发生了什么,我该怎么做才能解决这个问题？